Move Lexpad HLL mapping to where it probably shoulda gone in the firs…

…t place.
Raku · Mar 13, 2011 · 4619313 · 4619313
1 parent e96422c
commit 4619313
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 6 deletions.
diff --git a/src/HLL/SerializationContextBuilder.pm b/src/HLL/SerializationContextBuilder.pm
@@ -300,6 +300,12 @@ class HLL::Compiler::SerializationContextBuilder {
             ),
             PAST::Stmts.new(
                 PAST::Op.new( :pirop('nqp_dynop_setup v') ),
+                PAST::Op.new(
+                    :pasttype('callmethod'), :name('hll_map'),
+                    PAST::Op.new( :pirop('getinterp P') ),
+                    PAST::Op.new( :pirop('get_class Ps'), 'LexPad' ),
+                    PAST::Op.new( :pirop('get_class Ps'), 'NQPLexPad' )
+                ),
                 PAST::Op.new( :pirop('load_bytecode vs'), 'nqpmo.pbc' ),
                 PAST::Op.new(
                     :pasttype('bind'),

diff --git a/src/NQP/Actions.pm b/src/NQP/Actions.pm
@@ -63,12 +63,6 @@ class NQP::Actions is HLL::Actions {
 
         # Need to load the NQP dynops/dympmcs.
         $unit.loadlibs('nqp_group', 'nqp_ops');
-        $unit.unshift(PAST::Op.new(
-            :pasttype('callmethod'), :name('hll_map'),
-            PAST::Op.new( :pirop('getinterp P') ),
-            PAST::Op.new( :pirop('get_class Ps'), 'LexPad' ),
-            PAST::Op.new( :pirop('get_class Ps'), 'NQPLexPad' )
-        ));
 
         # If we have a MAIN sub, call it at end of mainline.
         if $*MAIN_SUB {