Revert "More tests for malformed loops"

This reverts commit 1b0b309.
Raku · May 4, 2020 · 71ed05c · 71ed05c
1 parent 1b0b309
commit 71ed05c
Showing 1 changed file with 2 additions and 7 deletions.
diff --git a/S32-exceptions/misc.t b/S32-exceptions/misc.t
@@ -5,7 +5,7 @@ use lib $?FILE.IO.parent(2).add("packages");
 use Test;
 use Test::Util;
 
-plan 175;
+plan 171;
 
 # RT #77270
 throws-like 'sub foo(--> NoSuchType) { }; foo', X::Undeclared, what => { m/'Type'/ }, symbol => { m/'NoSuchType'/ };
@@ -286,12 +286,7 @@ throws-like 'for ^5 { return; }', X::ControlFlow::Return;
 throws-like 'return;', X::ControlFlow::Return;
 
 # RT #125595
-throws-like 'loop (my $i = 0; $i <= 5; $i++;) { say $i }', X::Syntax::Malformed, what => /^'loop spec'/;
-# RT #127857
-throws-like 'loop () { say $i }', X::Syntax::Malformed, what => /^'loop spec' .* 'semicolon'/;
-throws-like 'loop (my $i = 0, $i <= 5, $i++) { say $i }', X::Syntax::Malformed, what => /^'loop spec' .* 'got 1'/;
-throws-like 'loop (my $i = 0; $i <= 5, $i++) { say $i }', X::Syntax::Malformed, what => /^'loop spec' .* 'got 2'/;
-throws-like 'loop (my $i = 0; $i <= 5; $i++; $i++) { say $i }', X::Syntax::Malformed, what => /^'loop spec' .* 'got more'/;
+throws-like 'loop (my $i = 0; $i <= 5; $i++;) { say $i }', X::Syntax::Malformed, what => 'loop spec';
 
 # RT #115398
 throws-like 'my package P { }; P[Int]', X::NotParametric;