Overview
Comment: | Ignores symbolic ($i) crs. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | origin/master | trunk |
Files: | files | file ages | folders |
SHA3-256: |
86bbc7c15d4ec3960ab21ebfdfe4d546 |
User & Date: | gawthrop@users.sourceforge.net on 1997-03-22 15:15:44 |
Other Links: | branch diff | manifest | tags |
Context
1997-03-22
| ||
15:50:59 | Changed %1.0f to %d format. check-in: 9449b621f0 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
15:15:44 | Ignores symbolic ($i) crs. check-in: 86bbc7c15d user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
1997-03-20
| ||
17:48:50 | Better _input.c file default. check-in: 28e47527b8 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/awk/lbl2cr.awk from [ba5795ecc8] to [2522d5714b].
︙ | |||
8 9 10 11 12 13 14 15 16 17 18 19 20 21 | 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.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 ## Added none to no cr list ## # Revision 1.2 1996/11/02 10:22:22 peterg |
︙ | |||
42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 | 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 | + + | BEGIN { comment = "%"; arg_delimiter = ","; not_a_cr = "effort flow state internal external zero none"; numeric = "[0-9]"; symbolic = "\044"; # Ascii $ 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 ); } } |
︙ |