make S04-phasers/next.t robuster wrt laziness

Raku · Dec 10, 2012 · 4677a6f · 4677a6f
1 parent 42d1a93
commit 4677a6f
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/S04-phasers/next.t b/S04-phasers/next.t
@@ -59,6 +59,7 @@ plan 13;
             NEXT { $str ~= $_ }
             die if $_ > 3;
         }
+        0;
     }
     is $str, '123', "die didn't trigger NEXT \{}";
 }
@@ -71,6 +72,7 @@ plan 13;
             NEXT { $str ~= $_ }
             leave if $_ > 3;
         }
+        0;
     }
     #?pugs todo
     is $str, '123', "leave didn't trigger NEXT \{}";
@@ -83,6 +85,7 @@ plan 13;
             NEXT { $str ~= $_ }
             return if $_ > 3;
         }
+        0;
     }
     foo();
     is $str, '123', "return didn't trigger NEXT \{}";