[svn:parrot] r46574 - branches/ops_pct/compilers/opsc/src/Ops/Compiler

[bacek at svn.parrot.org]

Author: bacek
Date: Thu May 13 08:04:55 2010
New Revision: 46574
URL: https://trac.parrot.org/parrot/changeset/46574

Log:
Always add parsed op into $past<ops>. Fix for building dynops.

Modified:
   branches/ops_pct/compilers/opsc/src/Ops/Compiler/Actions.pm

Modified: branches/ops_pct/compilers/opsc/src/Ops/Compiler/Actions.pm
==============================================================================
--- branches/ops_pct/compilers/opsc/src/Ops/Compiler/Actions.pm	Thu May 13 06:39:55 2010	(r46573)
+++ branches/ops_pct/compilers/opsc/src/Ops/Compiler/Actions.pm	Thu May 13 08:04:55 2010	(r46574)
@@ -9,7 +9,8 @@
 
 INIT {
     pir::load_bytecode("nqp-settings.pbc");
-    $CODE := 0;
+    $CODE  := 0;
+    $OPLIB := 0;
 }
 
 method TOP($/) {
@@ -17,7 +18,6 @@
 }
 
 method body($/) {
-
     my $past := PAST::Stmts.new(
         :node($/)
     );
@@ -52,13 +52,13 @@
                     $op<code> := $CODE++;
                     $op<experimental> := 1;
                 }
-
-                $past<ops>.push($op);
             }
             else {
                 $op<code> := $CODE++;
                 $op<experimental> := 0;
             }
+
+            $past<ops>.push($op);
         }
     }