[svn:parrot] r39217 - trunk/compilers/nqp/src/Grammar
pmichaud at svn.parrot.org
pmichaud at svn.parrot.org
Thu May 28 13:11:33 UTC 2009
Author: pmichaud
Date: Thu May 28 13:11:33 2009
New Revision: 39217
URL: https://trac.parrot.org/parrot/changeset/39217
Log:
[nqp]: Some small cleanups to bacek++'s changes in r39216.
Modified:
trunk/compilers/nqp/src/Grammar/Actions.pir
Modified: trunk/compilers/nqp/src/Grammar/Actions.pir
==============================================================================
--- trunk/compilers/nqp/src/Grammar/Actions.pir Thu May 28 12:11:42 2009 (r39216)
+++ trunk/compilers/nqp/src/Grammar/Actions.pir Thu May 28 13:11:33 2009 (r39217)
@@ -378,6 +378,7 @@
## if $<declarator> eq 'method' {
## $past.blocktype('method');
## $past.push(PAST::Op.new('inline'=>'.lex 'self', self);
+## $past.symbol('self', :scope('lexical'));
## }
## for $<signature>[0] {
## my $parameter := $($_<parameter>);
@@ -404,6 +405,7 @@
$P3 = get_hll_global ['PAST'], 'Op'
$P4 = $P3.'new'('inline'=>' .lex "self", self', 'pasttype'=>'inline')
unshift past, $P4
+ past.'symbol'('self', 'scope'=>'lexical')
add_signature:
$P0 = match['signature']
$P0 = $P0[0]
@@ -743,7 +745,7 @@
## method noun($/, $key) {
## if $key eq 'self' {
-## make PAST::Var.new('name'=>'self', 'node'=>$/);
+## make PAST::Var.new(:name('self'), :scope('lexical'), :node($/));
## }
## else {
## make $($/{$key});
More information about the parrot-commits
mailing list