Overview
Comment:Now uses extended sympars -- sympar + switches
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: e408b99c7f136bf55604afc4ff027fdef918b9480d4b92edcf3fe08e08aa263f
User & Date: gawthrop@users.sourceforge.net on 1998-07-25 18:49:00.000
Other Links: branch diff | manifest | tags
Context
1998-07-25
18:50:53
Lower case names check-in: 0a340b14d4 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
18:49:00
Now uses extended sympars -- sympar + switches check-in: e408b99c7f user: gawthrop@users.sourceforge.net tags: origin/master, trunk
18:35:02
Initial revision check-in: 636b58fc0c user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Side-by-Side Diff Ignore Whitespace Patch
Modified mttroot/mtt/bin/trans/sympar2global_txt2lang from [afc066bc3b] to [d0a4142906].
︙
12
13
14
15
16
17
18



19
20
21
22
23
24
25
26
27
28
29
30
31




32
33
34
35
36
37
38

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

29
30
31
32

33
34
35
36
37
38
39
40
41
42
43








+
+
+







-




-
+
+
+
+










###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.1  1998/06/15 15:24:33  peterg
## Initial revision
##
###############################################################

# Set up language stuff.
language=$2

case $language in
    m)
	ext='m'
	Lc='#';
	Rc='#';
	;;
    c)
	ext='c'
	Lc='/*';
	Rc='*/';
	;;
    java)
	Lc='/*';
	Rc='*/';
	;;
    *)
	echo Language $2 not supported - sorry; exit 1
esac
︙
48
49
50
51
52
53
54
55

56
57
58
59
60
61
62
63










64
65
66
67
68
69
70
71

53
54
55
56
57
58
59

60
61
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








-
+








+
+
+
+
+
+
+
+
+
+









BEGIN{
  var = "foobar";
  print "global ..."
}
{i++; print tolower($1), "..."; var = $1}
END{
  print var ";" # Repeat the last variable to avoid the trailing ...
}' $1_sympar.txt
}' $1_sympars.txt

fi

if [ "$language" = "c" ]; then
    awk '{
      i++; print "extern double", tolower($1) ";";
    }' $1_sympar.txt
 fi

if [ "$language" = "java" ]; then
cat <<EOF
  $1_numpar p;
  private p = new $1_numpar();
EOF
    awk '{
      i++; print "  float " tolower($1) " = p." tolower($1) ";";
    }' $1_sympar.txt
fi


echo

# Now invoke the standard error handling.
# mtt_error mtt_error.txt
MTT: Model Transformation Tools
[ GitHub | SourceHut | Sourceforge | Fossil RSS ]