Index: mttroot/mtt/bin/trans/p2oct ================================================================== --- mttroot/mtt/bin/trans/p2oct +++ mttroot/mtt/bin/trans/p2oct @@ -13,10 +13,13 @@ ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ +## Revision 1.1 2000/02/07 15:48:33 peterg +## Initial revision +## ## Revision 1.3 1998/07/29 11:09:39 peterg ## Now matches ^$1$ not $1! ## ## Revision 1.2 1998/03/08 21:02:55 peterg ## Now does multiple crs. @@ -34,13 +37,13 @@ rm -f mtt_error # This is the main transformation using gawk # And remove crs with same name as system -awk -f $MTTPATH/trans/awk/lbl2cr.awk $1_lbl.txt 2>mtt_error.txt |\ +gawk -f $MTTPATH/trans/awk/lbl2cr.awk $1_lbl.txt 2>mtt_error.txt |\ grep -v "^$1$" \ > $1_cr.txt # Now invoke the standard error handling. mtt_error mtt_error.txt Index: mttroot/mtt/bin/trans/txt2m ================================================================== --- mttroot/mtt/bin/trans/txt2m +++ mttroot/mtt/bin/trans/txt2m @@ -13,10 +13,13 @@ # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% Version control history # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% $Id$ # %% $Log$ +# %% Revision 1.19 2000/02/11 13:35:16 peterg +# %% Added the new MTTpar generation +# %% # %% Revision 1.18 1999/11/14 22:22:17 peterg # %% Removed checks for implicit - now done at command-line level. # %% # %% Revision 1.17 1999/11/04 04:54:24 peterg # %% Removed recreation of smx file. @@ -120,11 +123,11 @@ ;; esac #Write out the variables in m format. cat $1_$2.txt | grep -v METHOD |\ -awk -F# 'BEGIN{ +gawk -F# 'BEGIN{ quote = "\047"; doublequote = "\042"; } { N=split($1,a,"="); @@ -167,11 +170,11 @@ -e 's/#/%/g' \ >> $1_$2.m if [ "$2" = "numpar" ]; then - awk '{ + gawk '{ printf(" MTTpar(%i) \t= %s;\n",++i, tolower($1)); }'< $1_sympar.txt >>$1_numpar.m fi