Fix Array smart-matching when two Whatevers were written one after th…

…e other. Resolves RT#61452.
rakudo · Feb 13, 2009 · daa2eea · daa2eea
1 parent 01811bf
commit daa2eea
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/classes/List.pir b/src/classes/List.pir
@@ -63,6 +63,8 @@ Smart-matches against the list.
     unless it_a goto true
     .local pmc looking_for
     looking_for = shift it_a
+    $I0 = isa looking_for, whatever
+    if $I0 goto handle_whatever
   whatever_loop:
     $P0 = 'infix:==='(looking_for, cur_b)
     if $P0 goto found_looking_for