Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
improve error report for anon vars [RT #123584]
`$; my $b;` now gives: Useless use of variable $ANON_VAR__1 in sink context (line 1)
           instead of: Cannot find method "orig"
  • Loading branch information
FROGGS committed Feb 7, 2015
1 parent db6254b commit 5450e7e
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/Perl6/Actions.nqp
Expand Up @@ -1699,7 +1699,7 @@ class Perl6::Actions is HLL::Actions does STDActions {
my $*IN_DECL := 'variable';
my $*SCOPE := 'state';
my $*OFTYPE; # should default to Mu/Mu/Any
$past := QAST::Var.new( );
$past := QAST::Var.new( :node($/) );
$past := declare_variable($/, $past, $name, '', '', 0);
$past.annotate('nosink', 1);
}
Expand Down

0 comments on commit 5450e7e

Please sign in to comment.