Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

[re-smop] add a fuged ../../t/spec/S04-statements/while.t to TESTS

git-svn-id: http://svn.pugscode.org/pugs@27705 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
commit fae1eae8215869716efd2e94aa396acc49ad3410 1 parent fe6c53a
pmurias authored
Showing with 3 additions and 0 deletions.
  1. +3 −0  S04-statements/while.t
View
3  S04-statements/while.t
@@ -45,6 +45,7 @@ plan 9;
}
+#?mildew skip 1
# L<S04/The C<for> statement/It is also possible to write>
# while ... -> $x {...}
{
@@ -56,6 +57,7 @@ plan 9;
is $str, '54321', 'while ... -> $x {...} worked (1)';
}
+#?mildew skip 1
{
my @array = 0..5;
my $str;
@@ -65,6 +67,7 @@ plan 9;
is $str, '54321', 'while ... -> $x {...} worked (2)';
}
+#?mildew skip 1
# L<S04/Statement parsing/keywords require whitespace>
{
my $i = 0;
Please sign in to comment.
Something went wrong with that request. Please try again.