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

[cotto at svn.parrot.org]

Author: cotto
Date: Sat May 15 18:21:16 2010
New Revision: 46677
URL: https://trac.parrot.org/parrot/changeset/46677

Log:
[opsc] minor cleanup

Modified:
   branches/ops_pct/compilers/opsc/src/Ops/OpLib.pm

Modified: branches/ops_pct/compilers/opsc/src/Ops/OpLib.pm
==============================================================================
--- branches/ops_pct/compilers/opsc/src/Ops/OpLib.pm	Sat May 15 16:00:11 2010	(r46676)
+++ branches/ops_pct/compilers/opsc/src/Ops/OpLib.pm	Sat May 15 18:21:16 2010	(r46677)
@@ -144,7 +144,6 @@
     for $ops<op> {
         my $name    := ~$_<name>;
         my $number  := +$_<number>;
-        #say(@parts[0] ~ ' => ' ~@parts[1]);
         if (+$number) eq $number {
             if ($prev + 1 != $number) {
                 die("hole in ops.num before #$number");
@@ -203,17 +202,11 @@
 
 =end ACCESSORS
 
-method max_op_num() {
-    self<max_op_num>;
-}
+method max_op_num() { self<max_op_num>; }
 
-method optable() {
-    self<optable>;
-}
+method optable()    { self<optable>; }
 
-method skiptable() {
-    self<skiptable>;
-}
+method skiptable()  { self<skiptable>; }
 
 
 # Local Variables: