Overview
Comment:Geraint's broken number patch applied
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 6a40005962c5fc7c591c5d70cd0a3d0c02700edf1ce38f996fbd8d10d60adb12
User & Date: gawthrop@users.sourceforge.net on 2001-02-03 13:54:02
Other Links: branch diff | manifest | tags
Context
2001-02-03
14:00:01
Geraint's temp. variable patch applied check-in: f70a014035 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
13:54:02
Geraint's broken number patch applied check-in: 6a40005962 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
13:40:45
Added explicit MTTNu check-in: 2dc4650985 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/cse2smx_lang from [7e3cce71af] to [cb9652010b].

184
185
186
187
188
189
190




191
192
193
194
195

196
197
198
199
200
201
202
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198

199
200
201
202
203
204
205
206







+
+
+
+




-
+







          GENTRAN mttax(i) ::=: mttAAx_i;
        END;
  END;

%Shut the  output according to the language.
 GENTRANSHUT "$1_$rep.body";
EOF

fix_broken_numbers ( ) {
    sed -e "/[0-9.]$/ N" -e "s/\([0-9.]\)[\n\t\ ]*\([0-9]\)/\1\2/g"
}

if [ "$lang" = "m" ]; then
#  lang_header $noglobals $parameters $1 $rep m 'mttx,mttu,mttt,mttpar' $out > $1_$rep.m
  mtt_header $1 $rep m > $1_$rep.m
  cat $1_$rep.body | mtt_p2m >> $1_$rep.m
  cat $1_$rep.body | fix_broken_numbers | mtt_p2m >> $1_$rep.m
  echo "## END Code" >> $1_$rep.m
  echo "endfunction" >> $1_$rep.m
fi
 
# Now invoke the standard error handling.
mtt_error_r cse2smx_lang.log


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