Skip to content

Instantly share code, notes, and snippets.

@zoffixznet
Created December 10, 2016 19:48
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save zoffixznet/b36be388bb44b5e67dc9f94a205595e1 to your computer and use it in GitHub Desktop.
Save zoffixznet/b36be388bb44b5e67dc9f94a205595e1 to your computer and use it in GitHub Desktop.
zoffix@VirtualBox:~/CPANPRC/rakudo$ gd
diff --git a/src/Perl6/Actions.nqp b/src/Perl6/Actions.nqp
index b97cbb6..503ec52 100644
--- a/src/Perl6/Actions.nqp
+++ b/src/Perl6/Actions.nqp
@@ -7766,8 +7766,7 @@ class Perl6::Actions is HLL::Actions does STDActions {
# ($/,) = $result - We do this so the replacement closure can close
# over the current match.
QAST::Op.new( :op('p6store'),
- QAST::Op.new( :op('call'), :name('&infix:<,>'),
- QAST::Var.new( :name('$/'), :scope('lexical') ) ),
+ QAST::Var.new( :name('$/'), :scope('lexical') ),
QAST::Var.new( :name($result), :scope('local') ),
),
@@ -7830,8 +7829,7 @@ class Perl6::Actions is HLL::Actions does STDActions {
)
) !!
QAST::Op.new( :op('p6store'),
- QAST::Op.new( :op('call'), :name('&infix:<,>'),
- QAST::Var.new( :name('$/'), :scope('lexical') ) ),
+ QAST::Var.new( :name('$/'), :scope('lexical') ),
QAST::Var.new( :name($result), :scope('local') )
)
) !! QAST::Stmt.new(),
zoffix@VirtualBox:~/CPANPRC/rakudo$ +
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment