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

[svn:parrot] r34654 - trunk/languages/lua/src

From:
fperrad
Date:
December 30, 2008 11:03
Subject:
[svn:parrot] r34654 - trunk/languages/lua/src
Message ID:
20081230190335.DD070CB9FA@x12.develooper.com
Author: fperrad
Date: Tue Dec 30 11:03:35 2008
New Revision: 34654

Modified:
   trunk/languages/lua/src/POSTGrammar.tg

Log:
[Lua]
- revert r34355 for luap.pir

Modified: trunk/languages/lua/src/POSTGrammar.tg
==============================================================================
--- trunk/languages/lua/src/POSTGrammar.tg	(original)
+++ trunk/languages/lua/src/POSTGrammar.tg	Tue Dec 30 11:03:35 2008
@@ -87,7 +87,7 @@
   L4:
     .local pmc start
     $P0 = get_hll_global ['Lua'; 'POST'], 'Sub'
-    start = $P0.'new'('name'=>'&start', 'pirflags'=>':anon :main', 'hll'=>'lua')
+    start = $P0.'new'('name'=>'&start', 'pirflags'=>':anon :main')
     $S0 = post.'subid'()
     start.'push_pirop'('inline', $S0, 'inline'=><<'PIRCODE')
     .param pmc args :optional
@@ -111,6 +111,7 @@
     $P0 = get_hll_global ['Lua'; 'POST'], 'Chunk'
     .tailcall $P0.'new'(start, 'node'=>node, 'prologue'=><<'PIRCODE')
 .include "interpinfo.pasm"
+.HLL "lua"
 .loadlib "lua_group"
 PIRCODE
 }



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