Overview
Comment:Fixed bug in writing system_name
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: da10810becc32d1be3ef356c4dc80991f273f9654f06be43c149c2c339fec18a
User & Date: gawthrop@users.sourceforge.net on 2000-03-16 13:49:55.000
Other Links: branch diff | manifest | tags
Context
2000-03-17
09:53:10
Removed irritating echo Using "$1_sub.sh" check-in: 7acd8901d2 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
2000-03-16
13:49:55
Fixed bug in writing system_name check-in: da10810bec user: gawthrop@users.sourceforge.net tags: origin/master, trunk
12:53:53
Now puts in explicit VAR statements. check-in: f2d53c1709 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
41
42
43
44
45
46
47
48

49
50
51
52
53
54
55
56

57
58
59
60

61
62
63
64
65
66
67
41
42
43
44
45
46
47

48
49
50
51
52
53
54
55

56
57
58
59

60
61
62
63
64
65
66
67







-
+







-
+



-
+







BEGIN {
  var = "[%|#]VAR";
  not_an_arg = "effort flow state internal external zero unknown 0 1";
  arg_line = "arg = ";
}
{
  ## Explicit VAR declarations
  if (match($1,var)>0) print $2 "\t" name;
  if (match($1,var)>0) print $2 "\t" system_name;

   ## Implicit declarations from the arg list
  if (match($1,"arg")>0) {
    args=substr($3,2,length($3)-3);
    N=split(args, arg, ",");
    for (i=1;i<=N;i++){
      if ( (length(arg[i])>0)&&(matches(not_an_arg,arg[i])==0) ){
        print arg[i] "\t" name;
        print arg[i] "\t" system_name;
      }
    }
  }
}'name=$1 |\
}' system_name=$1 |\
sort -u > $1_sympar.txt 2>mtt_error.txt

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




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