Replace a couple of pir op uses with nqp ops.

Just some assorted ones where we already have the NQP op defined.
Raku · Jan 14, 2013 · 7c8021d · 7c8021d
1 parent 81d9937
commit 7c8021d
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/src/HLL/World.pm b/src/HLL/World.pm
@@ -50,7 +50,7 @@ class HLL::World {
 
     method BUILD(:$handle!, :$description = '<unknown>') {
         # Initialize attributes.
-        $!sc              := pir::nqp_create_sc__PS($handle);
+        $!sc              := nqp::createsc($handle);
         $!handle          := $handle;
         %!addr_to_slot    := nqp::hash();
         @!fixup_tasks     := nqp::list();

diff --git a/src/NQP/World.pm b/src/NQP/World.pm
@@ -329,8 +329,8 @@ class NQP::World is HLL::World {
 
             # Add deserialization fixup task.
             self.add_fixup_task(
-                :deserialize_past(QAST::VM.new(
-                    :pirop('set_sub_code_object vPP'),
+                :deserialize_past(QAST::Op.new(
+                    :op('setcodeobj'),
                     QAST::BVal.new( :value($past) ),
                     QAST::WVal.new( :value($code_obj) )
                 )));
@@ -343,8 +343,8 @@ class NQP::World is HLL::World {
                 QAST::SVal.new( :value('$!do') ),
                 QAST::BVal.new( :value($past) )
             ));
-            $fixups.push(QAST::VM.new(
-                :pirop('set_sub_code_object vPP'),
+            $fixups.push(QAST::Op.new(
+                :op('setcodeobj'),
                 QAST::BVal.new( :value($past) ),
                 QAST::WVal.new( :value($code_obj) )
             ));