Overview
Comment:Zapped $1 etc -- just in case folks are using the old argument stuff.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 7960a46cb6bf3c19564457579d33c186a00b580e4cc619560f8006482a0a1a73
User & Date: gawthrop@users.sourceforge.net on 2000-03-28 08:43:34
Other Links: branch diff | manifest | tags
Context
2000-03-29
09:46:22
Tidied up and reverted to \ version check-in: 0b05b630e5 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
2000-03-28
08:43:34
Zapped $1 etc -- just in case folks are using the old argument stuff. check-in: 7960a46cb6 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
2000-03-20
16:45:26
*** empty log message *** check-in: fd9ba05b44 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/abg2sympar_m2txt from [532340d600] to [daf0665c64].

︙︙
36
37
38
39
40
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

    }
  }
  return matched;
}

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" 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" system_name;
      }
    }
  }
}' system_name=$1 |\

sort -u > $1_sympar.txt 2>mtt_error.txt

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











|











|





>








36
37
38
39
40
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
68

    }
  }
  return matched;
}

BEGIN {
  var = "[%|#]VAR";
  not_an_arg = "effort flow state internal external zero unknown";
  arg_line = "arg = ";
}
{
  ## 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;
      }
    }
  }
}' system_name=$1 |\
grep -v '^\$' |\
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 ]