Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP

Comparing changes

Choose two branches to see what's changed or to start a new pull request. If you need to, you can also compare across forks.

Open a pull request

Create a new pull request by comparing changes across two branches. If you need to, you can also compare across forks.
...
Checking mergeability… Don't worry, you can still create the pull request.
  • 2 commits
  • 1 file changed
  • 0 commit comments
  • 1 contributor
Showing with 9 additions and 2 deletions.
  1. +9 −2 S04-phasers/enter-leave.t
View
11 S04-phasers/enter-leave.t
@@ -2,7 +2,7 @@ use v6;
use Test;
-plan 20;
+plan 21;
# L<S04/Phasers/ENTER "at every block entry time">
# L<S04/Phasers/LEAVE "at every block exit time">
@@ -87,7 +87,7 @@ plan 20;
# normal closure:
#?niecza skip 'leave'
-#?rakudo skip 'some syntax error whlie parsing'
+#?rakudo skip 'some syntax error while parsing'
{
#?pugs todo
is eval(q{
@@ -206,4 +206,11 @@ plan 20;
ok($a == 1 && $b == 2, "LEAVE fires in a multi sub");
}
+# RT #115998
+{
+ my $x = 0;
+ for 1..10 { LEAVE { $x++ }; next }
+ is $x, 10, "next triggers LEAVE";
+}
+
# vim: ft=perl6

No commit comments for this range

Something went wrong with that request. Please try again.