Overview
Comment:Added noglobal fudge
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: d150ff3b2f5515f601fdc6b14a8b7d1b9e55b689ca22612fd08c0c869066dbcd
User & Date: gawthrop@users.sourceforge.net on 2000-10-11 08:01:42
Other Links: branch diff | manifest | tags
Context
2000-10-11
08:27:27
New piped version.
any mttnn variable
looks for () not [] check-in: 0f4769d918 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
08:01:42
Added noglobal fudge check-in: d150ff3b2f user: gawthrop@users.sourceforge.net tags: origin/master, trunk
2000-10-10
21:03:20
*** empty log message *** check-in: dc83a75f96 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

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
︙︙

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