Overview
Comment:Now uses new mtt_strip_cr in common with mtt_make_sympar
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 027636b78a02ce575230f221d2d2121b67f54ce380fb614b8abdcfa398cfcf65
User & Date: gawthrop@users.sourceforge.net on 2000-10-16 09:15:41
Other Links: branch diff | manifest | tags
Context
2000-10-16
09:41:29
Fixed bug with printing a blank line. check-in: 11cbaba428 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:15:41
Now uses new mtt_strip_cr in common with mtt_make_sympar check-in: 027636b78a user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:10:08
Now strips out "unwanted" bits frome the _aliased.txt file check-in: 5c97259fbf user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/abg2sympar_m2txt from [929d167ef3] to [79a422f5f6].

45
46
47
48
49
50
51
52
53
54
55
56


57
58
59
60
61


62
63
64

65
66
67
45
46
47
48
49
50
51





52
53


54


55
56
57
58

59
60
61
62







-
-
-
-
-
+
+
-
-

-
-
+
+


-
+



{
  ## Explicit VAR declarations
  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)&&(match(arg[i],"^[0-9]+[.]*")==0) ){
        print arg[i] "\t" system_name;
      }
    print args
  }
    }
  }
}' system_name=$2 |\
grep -v '^\$' #|\
#sort -u > $1_sympar.txt 2>mtt_error.txt
grep -v '^\$' | mtt_strip_args |\
sort -u > $1_sympar.txt 2>mtt_error.txt

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




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