[svn:parrot] r44811 - branches/ops_pct/compilers/opsc/src/Ops/Compiler
mikehh at svn.parrot.org
mikehh at svn.parrot.org
Tue Mar 9 13:25:35 UTC 2010
Author: mikehh
Date: Tue Mar 9 13:25:34 2010
New Revision: 44811
URL: https://trac.parrot.org/parrot/changeset/44811
Log:
remove trailing whitespace and update copyright
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 Tue Mar 9 13:21:29 2010 (r44810)
+++ branches/ops_pct/compilers/opsc/src/Ops/Compiler/Actions.pm Tue Mar 9 13:25:34 2010 (r44811)
@@ -1,4 +1,4 @@
-# Copyright (C) 2009, Parrot Foundation.
+# Copyright (C) 2009-2010, Parrot Foundation.
# $Id$
class Ops::Compiler::Actions is HLL::Actions;
@@ -266,7 +266,7 @@
# on the mode of operation (function calls, switch statements, gotos
# with labels, etc.).
#
-
+
$op<jump> := '0';
if ($body ~~ / [ goto | restart ] \s+ OFFSET / ) {
@@ -348,7 +348,7 @@
-> $m { '{{=' ~ $m<addr> ~ '}}' }
);
- #'$1' -> '{{@1}}'
+ #'$1' -> '{{@1}}'
$body := subst($body,
/'$' $<arg_num>=[\d+]/,
-> $m { '{{@' ~ $m<arg_num> ~ '}}' }
More information about the parrot-commits
mailing list