Permalink
Browse files

test presence of placeholder attribute of X::Placeholder::Block excep…

…tions
  • Loading branch information...
1 parent 6c236a2 commit f52c2ed5b81b544cfc5584c9704927a817b89556 @moritz moritz committed Jan 23, 2012
Showing with 3 additions and 2 deletions.
  1. +3 −2 S32-exceptions/misc.t
View
@@ -34,7 +34,8 @@ throws_like 'sub f() { $^x }', X::Signature::Placeholder,
#?rakudo skip 'parsing of $& and other p5 variables'
throws_like '$&', X::Obsolete, old => '$@ variable', new => '$/ or $()';
-throws_like 'do { $^x }', X::Placeholder::Block;
-throws_like 'class { $^x }', X::Placeholder::Block;
+throws_like 'do { $^x }', X::Placeholder::Block, placeholder => '$^x';
+throws_like 'do { @_ }', X::Placeholder::Block, placeholder => '@_';
+throws_like 'class { $^x }', X::Placeholder::Block, placeholder => '$^x';
done;

0 comments on commit f52c2ed

Please sign in to comment.