Overview
Comment:Cleaned up to:
work properly for no globals
no need to repeat las global
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 630e6a8f42d2aefd167974ed756b4d8a1aedd051b0da4e2b8cbe9ace3ae741c9
User & Date: gawthrop@users.sourceforge.net on 1998-11-18 11:34:24
Other Links: branch diff | manifest | tags
Context
1998-11-18
11:42:55
Added "IF MTTNx>0 THEN" to avoid error message when no states check-in: 0fd592aaf1 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
11:34:24
Cleaned up to:
work properly for no globals
no need to repeat las global
check-in: 630e6a8f42 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
11:30:19
Now strips blank lines as well check-in: 3cc2fa6c12 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/sympar2global_txt2m from [7c631f718b] to [f5a3ce4eb7].

11
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
44
45
11
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
44
45

46
47
48
49
50
51
52







+
+
+















-
-
-
-
-
+
+
+
+
+
+
+
+

+
-
+






# Copyright (c) P.J.Gawthrop, 1997.

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.4  1998/07/26 10:44:08  peterg
## Now strips comment lines first
##
## Revision 1.3  1998/07/25 18:27:45  peterg
## now uses the (extended with switch) sympars.txt file
##
## Revision 1.2  1998/03/22 11:13:27  peterg
## Back under RCS
##
# Revision 1.1  1997/04/16  11:37:22  peterg
# Initial revision
#
###############################################################


#Write out the variables in matlab global format
strip_comments <$1_sympars.txt  |\
awk '
BEGIN{
  var = "foobar";
  print "global ..."
}
{i++; print tolower($1), "..."; var = $1}
{i++; 
  if ((i==1)&&(NF>0)) {
    printf ("global");
    globals_exist=1
  }
  if (NF>0)
    printf (" ...\n     %s", tolower($1));
}
END{
  if (globals_exist)
  print var ";" # Repeat the last variable to avoid the trailing ...
    print ";"
}' 

# Now invoke the standard error handling.
# mtt_error mtt_error.txt



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