"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "src/Perl6/Grammar.nqp" between
rakudo-2020.08.2.tar.gz and rakudo-2020.09.tar.gz

About: Rakudo is a compiler for the Perl 6 programming language.

Grammar.nqp  (rakudo-2020.08.2)	:	Grammar.nqp  (rakudo-2020.09)
skipping to change at line 3875		skipping to change at line 3875
if $op<OPER> && $op<OPER><O>.made{$reason} == 1 {		if $op<OPER> && $op<OPER><O>.made{$reason} == 1 {
self.typed_panic: "X::Syntax::CannotMeta", :$meta, operator => ~$op< OPER>, dba => ~$op<OPER><O>.made<dba>, reason => "too $reason";		self.typed_panic: "X::Syntax::CannotMeta", :$meta, operator => ~$op< OPER>, dba => ~$op<OPER><O>.made<dba>, reason => "too $reason";
}		}
self;		self;
}		}
regex term:sym<reduce> {		regex term:sym<reduce> {
:my $*IN_REDUCE := 1;		:my $*IN_REDUCE := 1;
:my $op;		:my $op;
<?before '['\S+']'>		<?before '['\S+']'>
<!before '[' <.[ - + ? ~ ^ ]> <.[ \w $ @ ]> > # disallow accidental pre fix before termish thing		<!before '['+ <.[ - + ? ~ ^ ]> <.[ \w $ @ ]> > # disallow accidental pr efix before termish thing
'['		'['
[		[
|| <op=.infixish('red')> <?[\]]>		|| <op=.infixish('red')> <?[\]]>
|| $<triangle>=[\\]<op=.infixish('tri')> <?[\]]>		|| $<triangle>=[\\]<op=.infixish('tri')> <?[\]]>
|| <!>		|| <!>
]		]
']'		']'
{ $op := $<op>; }		{ $op := $<op>; }
End of changes. 1 change blocks.
1 lines changed or deleted		1 lines changed or added

---