Overview
| Comment: | Added noglobal fudge |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
3ade5884b19c961b771a8d21eb5783b1 |
| User & Date: | gawthrop@users.sourceforge.net on 2000-10-11 08:01:42.000 |
| Other Links: | branch diff | manifest | tags |
Context
|
2000-10-11
| ||
| 08:27:27 |
New piped version. any mttnn variable looks for () not [] check-in: 4ed20a8676 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 08:01:42 | Added noglobal fudge check-in: 3ade5884b1 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
|
2000-10-10
| ||
| 21:03:20 | *** empty log message *** check-in: 470e3ae16f user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/mtt_header
from [6857243a08]
to [1c8b860930].
| ︙ | ︙ | |||
8 9 10 11 12 13 14 15 16 17 18 19 20 21 | # Copyright (C) 2000 by Peter J. Gawthrop ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ############################################################### # Arguments system=$1 rep=$2 language=$3 args=$4 | > > > | 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 | # Copyright (C) 2000 by Peter J. Gawthrop ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.1 2000/10/10 21:02:27 peterg ## Initial revision ## ############################################################### # Arguments system=$1 rep=$2 language=$3 args=$4 |
| ︙ | ︙ | |||
62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 |
ext='m';
Lc='##';
Rc='';
Lb='(';
Rb=')';
function="function"
declaration="[$output] = $1_$rep($args);"
;;
*)
echo Language $language not supported - sorry; exit 1
esac
# Header information
cat<<EOF
$modeline
$function $declaration
$Lc $declaration
$Lc System $system, representation $rep, language $language; $Rc
$Lc File $1_$rep.$ext; $Rc
$Lc Generated by MTT on `date`; $Rc
EOF
# Parameters
cat <<EOF
$Lc Parameters
EOF
sympar2par_txt2m $1
| > > > > > > > > > > | 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 |
ext='m';
Lc='##';
Rc='';
Lb='(';
Rb=')';
function="function"
declaration="[$output] = $1_$rep($args);"
noglobals=true; # Fudge to make mtt_m2p work
;;
*)
echo Language $language not supported - sorry; exit 1
esac
# Header information
cat<<EOF
$modeline
$function $declaration
$Lc $declaration
$Lc System $system, representation $rep, language $language; $Rc
$Lc File $1_$rep.$ext; $Rc
$Lc Generated by MTT on `date`; $Rc
EOF
if [ -n "$noglobals" ]; then
cat<<EOF
## Horrible fudge to make mtt_m2p work
global ...
mtt_no_globals ;
EOF
fi
# Parameters
cat <<EOF
$Lc Parameters
EOF
sympar2par_txt2m $1
|
| ︙ | ︙ |