Overview
Comment:New much simpler version -- does not check for multiple crs -- these
are removed later anyway.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 3661becaf81ddb03b101ebcc93b88b3f43e643b43185e2fd20678da863997ddb
User & Date: gawthrop@users.sourceforge.net on 1997-04-22 12:50:15
Other Links: branch diff | manifest | tags
Context
1997-04-23
07:26:49
Added -o switch -- ode and dae are the same
Added switches to default menu check-in: 645d1d2c5c user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1997-04-22
12:50:15
New much simpler version -- does not check for multiple crs -- these
are removed later anyway. check-in: 3661becaf8 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1997-04-17
11:18:34
Write out the RCS header first! check-in: e59d7a2fad user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/awk/lbl2cr.awk from [2522d5714b] to [d41370188c].

︙︙
8
9
10
11
12
13
14



15
16
17
18
19
20
21

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

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$



# Revision 1.5  1997/03/20  12:05:31  peterg
# Now just writes out the cr name.
#
# Revision 1.4  1996/11/09  20:38:45  peterg
# Put in new lib pat
#
## Revision 1.3  1996/11/04 14:51:14  peterg








>
>
>








8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

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

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
# Revision 1.6  1997/03/22  15:15:44  peterg
# Ignores symbolic ($i) crs.
#
# Revision 1.5  1997/03/20  12:05:31  peterg
# Now just writes out the cr name.
#
# Revision 1.4  1996/11/09  20:38:45  peterg
# Put in new lib pat
#
## Revision 1.3  1996/11/04 14:51:14  peterg
︙︙
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
87
88
89

symbol_count = 0;
symbols = "";
}
{
  if ( (match($1,comment)==0) && (NF>=3) ) {
    cr = $2;
    first_char = substr(cr,1,1);
    if ( (matches(not_a_cr,cr )==0) \
	 && (match(not_a_cr,$3)==0) \
	 && (match($3,"\\$")==0) \
	 && (match(first_char,numeric)==0) \
	 && (length(cr )>0) \
	 && (matches(symbols,cr ) ==0) ) {
      symbol_count++;
      symbols = sprintf("%s %s", symbols, cr );
    }
  }
}
END {
# create the _cr file

  if (symbol_count>0) {
    split(symbols,symbol);
    for (i = 1; i <= symbol_count; i++) {
      #printf("$MTTPATH/lib/cr/r/%s.cr ", symbol[i]);
      printf("%s\n", symbol[i]);
    }
  }








}








|
<
<
<
<
<
<
<
<
<
<
<
<
|
<
<
<
<
<
|
|
<
<
<
<
<
<
<
<
<

56
57
58
59
60
61
62
63












64





65
66










symbol_count = 0;
symbols = "";
}
{
  if ( (match($1,comment)==0) && (NF>=3) ) {
    cr = $2;
    first_char = substr(cr,1,1);
    if ( (matches(not_a_cr,cr)==0) && (match(cr,numeric)==0) )












	 print cr;





	 }
}

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