diff example/get_segment/spe/fixpic.pl @ 466:4fa8760e18c2

prohibit global variable in Task....
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Thu, 01 Oct 2009 17:33:58 +0900
parents 40af9fc1d428
children 7777761e8e02
line wrap: on
line diff
--- a/example/get_segment/spe/fixpic.pl	Wed Sep 30 11:37:15 2009 +0900
+++ b/example/get_segment/spe/fixpic.pl	Thu Oct 01 17:33:58 2009 +0900
@@ -54,18 +54,18 @@
 		s/brsl/brasl/ ||
 		s/br/bra/ ;
           }
-       } elsif(/\s(lqr)\s+(\$\d+),([^\s]+)/) {
-          my $name = $2;
-          if (! defined $local{$name} || defined $weak{$name} ) {
+#       } elsif(/\s(lqr)\s+(\$\d+),([^\s]+)/) {
+#          my $name = $2;
+#          if (! defined $local{$name} || defined $weak{$name} ) {
 #	    s/lqr/lqd/;
-          }
-       } elsif(/\s(ila)\s+(\$\d+),([^\s]+)/) {
-          my $name = $3;
-          if (! defined $local{$name} || defined $weak{$name} ) {
-	    $_ = $_;
-	  } else {
-	    $_ = "\tai\t$2,\$0,$3-.\n";
-          }
+#          }
+#       } elsif(/\s(ila)\s+(\$\d+),([^\s]+)/) {
+#          my $name = $3;
+#          if (! defined $local{$name} || defined $weak{$name} ) {
+#	    $_ = $_;
+#	  } else {
+#	    $_ = "\tai\t$2,\$0,$3-.\n";
+#          }
        }
     }
     print ;