Index: mttroot/mtt/bin/trans/mtt_m2p ================================================================== --- mttroot/mtt/bin/trans/mtt_m2p +++ mttroot/mtt/bin/trans/mtt_m2p @@ -13,10 +13,13 @@ ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ +## Revision 1.51 2000/08/01 12:25:24 peterg +## Some changes to include files +## ## Revision 1.50 2000/05/19 17:46:41 peterg ## New version of state with par argument ## ## Revision 1.49 2000/05/18 09:45:45 peterg ## Fixed missing ; @@ -477,13 +480,13 @@ gsub(/&&/," AND ",$0) gsub(/\|\|/," OR ",$0) printf("%s THEN BEGIN\n", $0) } else { - if ((match($1,"mtt_write")>0)&&(length(Stdin)>0)) { - sub(/mtt_write/, "if NOT eof THEN mtt_write"); - } + #if ((match($1,"mtt_write")>0)&&(length(Stdin)>0)) { + # sub(/mtt_write/, "if NOT eof THEN mtt_write"); + #} if ($1=="for"){ if (($2=="it")&&(length(Stdin)>0)){ printf("WHILE NOT eof DO BEGIN {Integration loop}\n") } else {