Overview
Comment:Replaced awk with gawk (managed to unlock file at last).
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: aead96b7abf0d3d7c5a53a21d03e3adc48df3f23f2538d4b6f9cf761564c1bae
User & Date: geraint@users.sourceforge.net on 2002-05-27 15:30:41
Other Links: branch diff | manifest | tags
Context
2002-05-28
18:08:38
Fixed [ 547294 ] CRs are not sought from MTT_CRS. check-in: e4e5e97c5b user: geraint@users.sourceforge.net tags: origin/master, trunk
2002-05-27
15:30:41
Replaced awk with gawk (managed to unlock file at last). check-in: aead96b7ab user: geraint@users.sourceforge.net tags: origin/master, trunk
15:18:48
Trying to get rid of this! check-in: 86612195ab user: geraint@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/p2oct from [5c9f2513fe] to [3ed0dbadda].

︙︙
11
12
13
14
15
16
17



18
19
20
21
22
23
24

# Copyright (c) P.J.Gawthrop, 1997.

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$



## 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.
##
# Revision 1.1  1997/03/20  12:23:21  peterg








>
>
>








11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

# Copyright (c) P.J.Gawthrop, 1997.

###############################################################
## 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.
##
# Revision 1.1  1997/03/20  12:23:21  peterg
︙︙
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46

echo "Creating $1_cr.txt"

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 |\
grep -v "^$1$" \
> $1_cr.txt

# Now invoke the standard error handling.
mtt_error mtt_error.txt










|








35
36
37
38
39
40
41
42
43
44
45
46
47
48
49

echo "Creating $1_cr.txt"

rm -f mtt_error


# This is the main transformation using gawk 
# And remove crs with same name as system
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

Modified mttroot/mtt/bin/trans/txt2m from [f90e675ca6] to [75f1960eab].

︙︙
11
12
13
14
15
16
17



18
19
20
21
22
23
24



# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# %% Version control history
# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# %% $Id$
# %% $Log$



# %% 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.
# %%
# %% Revision 1.16  1999/03/06 02:18:10  peterg








>
>
>








11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27



# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# %% 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.
# %%
# %% Revision 1.16  1999/03/06 02:18:10  peterg
︙︙
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132

      echo "% Global variable list" >>  $1_$2.m
      sympar2global_txt2m $1 >> $1_$2.m
      ;;
esac

#Write out the variables in m format.
cat  $1_$2.txt | grep -v METHOD |\
awk -F#  'BEGIN{
quote = "\047";
doublequote = "\042";
}
{
  N=split($1,a,"=");
  if (N==2) {
    LHS = a[1];








|








121
122
123
124
125
126
127
128
129
130
131
132
133
134
135

      echo "% Global variable list" >>  $1_$2.m
      sympar2global_txt2m $1 >> $1_$2.m
      ;;
esac

#Write out the variables in m format.
cat  $1_$2.txt | grep -v METHOD |\
gawk -F#  'BEGIN{
quote = "\047";
doublequote = "\042";
}
{
  N=split($1,a,"=");
  if (N==2) {
    LHS = a[1];
︙︙
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183

     -e 's/u(/mttu(/g' \
     -e 's/mttmtt/mtt/g' \
     -e 's/#/%/g' \
>> $1_$2.m


if [ "$2" = "numpar" ]; then
    awk '{
       printf("  MTTpar(%i) \t= %s;\n",++i, tolower($1));
     }'< $1_sympar.txt  >>$1_numpar.m
fi
















|












168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186

     -e 's/u(/mttu(/g' \
     -e 's/mttmtt/mtt/g' \
     -e 's/#/%/g' \
>> $1_$2.m


if [ "$2" = "numpar" ]; then
    gawk '{
       printf("  MTTpar(%i) \t= %s;\n",++i, tolower($1));
     }'< $1_sympar.txt  >>$1_numpar.m
fi

MTT: Model Transformation Tools
[ GitHub | SourceHut | Sourceforge | Fossil RSS ]