Overview
| Comment: | removed echos |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
24bf94ae83386b4dbc10950f1bbdd37a |
| User & Date: | gawthrop@users.sourceforge.net on 2000-04-10 12:08:08 |
| Other Links: | branch diff | manifest | tags |
Context
|
2000-04-11
| ||
| 11:04:08 | Save old version using out files check-in: b9d7114632 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
|
2000-04-10
| ||
| 12:08:08 | removed echos check-in: 24bf94ae83 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 12:05:03 | Now does smx, smax smxax seperately. check-in: 0cefd409e3 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/mtt_p2C from [c99f6d9453] to [15da882620].
| ︙ | ︙ | |||
13 14 15 16 17 18 19 |
#$Id$
sys_rep="$1_$2"
begin="BEGIN{$sys_rep}"
# Inform user
| | | 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 |
#$Id$
sys_rep="$1_$2"
begin="BEGIN{$sys_rep}"
# Inform user
# echo "Creating $1_$2.pas"
# Find system constants
Nx=`mtt_getsize $1 x`
Nxx=`mtt_getsize $1 xx`
Nu=`mtt_getsize $1 u`
Ny=`mtt_getsize $1 y`
|
| ︙ | ︙ | |||
89 90 91 92 93 94 95 |
# Write out the actual code from the end of the procedure
awk 'BEGIN{writing=0}
{
if (writing) print $0;
if (match($1,begin)==1) writing=1;
}' begin=$begin < $1_$2.p >>$1_$2.pas
| | | 89 90 91 92 93 94 95 96 97 98 99 |
# Write out the actual code from the end of the procedure
awk 'BEGIN{writing=0}
{
if (writing) print $0;
if (match($1,begin)==1) writing=1;
}' begin=$begin < $1_$2.p >>$1_$2.pas
#echo "Creating $1_$2.C"
p2c -o $1_$2.C $1_$2.pas > mtt_p2C.log 2>> mtt_p2C.log
|