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

[bacek at svn.parrot.org]

Author: bacek
Date: Fri Mar 12 21:47:48 2010
New Revision: 44902
URL: https://trac.parrot.org/parrot/changeset/44902

Log:
Add "\n" before implicit "goto NEXT".

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	Fri Mar 12 21:47:18 2010	(r44901)
+++ branches/ops_pct/compilers/opsc/src/Ops/Compiler/Actions.pm	Fri Mar 12 21:47:48 2010	(r44902)
@@ -98,6 +98,12 @@
             :name('goto_offset')
         );
         $goto_next<is_next> := 1;
+
+        my $nl := "\n";
+        $op.push(PAST::Op.new(
+                :pasttype<inline>,
+                :inline($nl)
+            ));
         $op.push($goto_next);
         $op.push(PAST::Op.new(
                 :pasttype<inline>,