develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r34068 - branches/main/languages/perl6/src/parser

From:
pmichaud
Date:
December 18, 2008 08:23
Subject:
[svn:parrot] r34068 - branches/main/languages/perl6/src/parser
Message ID:
20081218162307.15A13CBA12@x12.develooper.com
Author: pmichaud
Date: Thu Dec 18 08:23:06 2008
New Revision: 34068

Modified:
   branches/main/languages/perl6/src/parser/actions.pm

Log:
[rakudo]:  Fix 'main' generation to actually call !UNIT_START.


Modified: branches/main/languages/perl6/src/parser/actions.pm
==============================================================================
--- branches/main/languages/perl6/src/parser/actions.pm	(original)
+++ branches/main/languages/perl6/src/parser/actions.pm	Thu Dec 18 08:23:06 2008
@@ -31,7 +31,7 @@
    # want it to be treated as the module's return value.
    $main.push(
        PAST::Op.new( :pirop('tailcall'),
-           :name('!UNIT_START'),
+           PAST::Op.new( :pirop('find_name'), '!UNIT_START' ),
            $past,
            PAST::Var.new( :scope('parameter'), :name('@_'), :slurpy(1) )
        )



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About