Permalink
Browse files

[subst.t] fix parsefailing s,,, test

git-svn-id: http://svn.pugscode.org/pugs@28939 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent f000672 commit a2bbf3cce1e4ec8553a64c7be3d929b3ba910ce4 lwall committed Oct 28, 2009
Showing with 5 additions and 1 deletion.
  1. +5 −1 S05-substitution/subst.t
View
@@ -198,9 +198,13 @@ is '12'.subst(/(.)(.)/,{$()*2}),'24', '.. and do nifty things in closures';
# RT #69044
{
sub s { 'sub s' }
+ $_ = "foo";
#?rakudo skip 'RT 69044'
- is s, 'sub s', 'can call sub s as "s"';
+ ok s,foo,bar, , 'bare s is always substititution';
is s(), 'sub s', 'can call sub s as "s()"';
+ #?rakudo skip 's () = RHS'
+ $_ = "foo";
+ ok s (foo) = 'bar', 'bare s is substitution before whitespace then parens';
}
done_testing;

0 comments on commit a2bbf3c

Please sign in to comment.