diff --git a/src/Perl6/Actions.nqp b/src/Perl6/Actions.nqp index 8ae3656183a..1cc64753f42 100644 --- a/src/Perl6/Actions.nqp +++ b/src/Perl6/Actions.nqp @@ -4548,9 +4548,10 @@ class Perl6::Actions is HLL::Actions does STDActions { my $non-placeholder-names := nqp::join(', ', @non-placeholder-names); - my $first-placeholder-name := $past.ann('placeholder_sig')[0]; + my $first-placeholder := $past.ann('placeholder_sig')[0]; + my $first-placeholder-name := $first-placeholder; - $/.PRECURSOR.panic("Placeholder variables (eg. $first-placeholder-name) cannot be used in a method.\nPlease specify an explicit signature, like $*METHODTYPE $method-name ($non-placeholder-names) \{ ... \}"); + $first-placeholder.PRECURSOR.panic("Placeholder variables (eg. $first-placeholder-name) cannot be used in a method.\nPlease specify an explicit signature, like $*METHODTYPE $method-name ($non-placeholder-names) \{ ... \}"); } if is_clearly_returnless($past) { $past[1] := QAST::Op.new(