fix issue in binder/multidispatch.c where A is narrower than B is nar…

…rower than A

Signed-off-by: Moritz Lenz <moritz@faui2k3.org>

src/binder/multidispatch.c

@@ -110,10 +110,17 @@ static INTVAL is_narrower(PARROT_INTERP, Rakudo_md_candidate_info *a, Rakudo_md_
         return 0;
 
     /* Otherwise, we see if one has a slurpy and the other not. A lack of
-     * slurpiness makes the candidate narrower. Also narrower if the first
-     * needs a bind check and the second doesn't. Otherwise, they're tied. */
-    return (a->max_arity != SLURPY_ARITY && b->max_arity == SLURPY_ARITY) ||
-        (a->bind_check && !(b->bind_check));
+     * slurpiness makes the candidate narrower. */
+
+    if (a->max_arity != SLURPY_ARITY && b->max_arity == SLURPY_ARITY) {
+        return 1;
+    }
+
+    /* Also narrower if the first needs a bind check and the second doesn't, if
+     * we wouldn't deem the other one narrower than this one int terms of
+     * slurpyness. Otherwise, they're tied. */
+    return !(b->max_arity != SLURPY_ARITY && a->max_arity == SLURPY_ARITY)
+        && (a->bind_check && !(b->bind_check));
 }