Mercurial > hg > Members > anatofuz > MoarVM
changeset 6:065d32ea977f
fix
author | Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Fri, 05 Oct 2018 20:48:17 +0900 |
parents | 6f5c1e8db40e |
children | b545249e9b62 |
files | cbctools/change_OP_to_cbc.pl |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/cbctools/change_OP_to_cbc.pl Fri Oct 05 20:34:17 2018 +0900 +++ b/cbctools/change_OP_to_cbc.pl Fri Oct 05 20:48:17 2018 +0900 @@ -47,14 +47,14 @@ push @rewritec,change_i($cbc_lines[$i]); - if ($cbc_lines[$i+1] =~ /OP/ && $none_left_blanket){ + if ($i != scalar(@cbc_lines)-1 && $cbc_lines[$i+1] =~ /OP/ && $none_left_blanket){ insert_right_blanket(); $none_left_blanket = 0; } } for (@rewritec){ - print "$_"; + #print "$_"; } sub change_i {