Copy Brent Laabs' tests for RT #76988

Raku · Apr 13, 2014 · 1119261 · 1119261
1 parent 5004da4
commit 1119261
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/S02-lexical-conventions/one-pass-parsing.t b/S02-lexical-conventions/one-pass-parsing.t
@@ -1,11 +1,17 @@
 use v6;
 use Test;
 
-plan 1;
+plan 3;
 
 # L<S02/"One-pass parsing">
 
 ok(EVAL('regex { <[ } > ]> }; 1'),
     "can parse non-backslashed curly and right bracket in cclass");
 
+# RT #74988
+{
+    eval_lives_ok 'sub if() { "#foo" }; say if();', "Can call sub if()";
+    eval_dies_ok 'sub if() { "#foo" }; say if;', "Calling sub if without parens parsefails";
+}
+
 # vim: ft=perl6