File tree 1 file changed +3
-2
lines changed 1 file changed +3
-2
lines changed Original file line number Diff line number Diff line change @@ -4104,12 +4104,13 @@ grammar P6 is STD {
4104
4104
given + % deftrap {$ name } {
4105
4105
$¢. worry(" Use of non-subscript <...> where postfix is expected; please use whitespace" ) if $ _ and substr (self . orig, $¢. pos , 1 ) eq ' <' ;
4106
4106
when 1 { # probably misused P5ism
4107
- $ < identifier > . sorryobs (" bare '$ name '" , " .$ name if you meant \$_, or use an explicit invocant or argument" );
4107
+ $ < identifier > . worryobs (" bare '$ name '" , " .$ name if you meant \$_, or use an explicit invocant or argument" );
4108
4108
}
4109
4109
when 2 { # probably misused P6ism
4110
- $ < identifier > . sorry (" The '$ name ' listop may not be called without arguments (please use () or whitespace to clarify)" );
4110
+ $ < identifier > . worry (" The '$ name ' listop may not be called without arguments (please use () or whitespace to clarify)" );
4111
4111
}
4112
4112
}
4113
+ $ < identifier > . sorry(" No valid term seen where one is required" );
4113
4114
}
4114
4115
}
4115
4116
}
You can’t perform that action at this time.
0 commit comments