Load nqp_group and nqp_ops and initialize them at the start of an NQP…

… program.
perl6 · Sep 25, 2010 · 6addc8f · 6addc8f
1 parent d84b3db
commit 6addc8f
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/NQP/Actions.pm b/src/NQP/Actions.pm
@@ -54,6 +54,10 @@ method comp_unit($/) {
     # (CTXSAVE is inherited from HLL::Actions.)
     $unit.push( self.CTXSAVE() );
 
+    # Need to load the nqp-rx dynops/dympmcs.
+    $unit.loadlibs('nqp_group', 'nqp_ops');
+    $unit.unshift(PAST::Op.new( :pirop('nqp_dynop_setup v') ));
+
     # We force a return here, because we have other
     # :load/:init blocks to execute that we don't want
     # to include as part of the mainline.