Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

test RT #72442. resolves ticket.

  • Loading branch information...
commit 6a6a83f0a6503b6d049ae5088eebb43b781cdf76 1 parent 6a03ec5
Matthew Wilson diakopter authored
Showing with 6 additions and 1 deletion.
  1. +6 −1 S04-statements/redo.t
7 S04-statements/redo.t 100644 → 100755
View
@@ -2,7 +2,7 @@ use v6;
use Test;
# L<S04/"Loop statements"/redo>
-plan 10;
+plan 11;
{
my $i = 0;
@@ -109,4 +109,9 @@ plan 10;
is($sum, 220, "test redo with while");
}
+{
+ # RT #72442
+ eval_dies_ok '{redo}', 'redo without loop construct dies';
+}
+
# vim: ft=perl6
Please sign in to comment.
Something went wrong with that request. Please try again.