Overview
Comment: | Returns 0 if no names. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | origin/master | trunk |
Files: | files | file ages | folders |
SHA3-256: |
b4a9b70c25bcd676a85a210c0b51c1c3 |
User & Date: | gawthrop@users.sourceforge.net on 1997-05-22 09:42:48 |
Other Links: | branch diff | manifest | tags |
Context
1997-05-22
| ||
10:11:04 | Fixed dat2gdat bug (with parameters) check-in: 3bf171c3b1 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
09:42:48 | Returns 0 if no names. check-in: b4a9b70c25 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
09:28:22 | Removed trailing , in output. check-in: 40a245a375 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/name2index from [277eeb6873] to [231060ba2b].
︙ | ︙ | |||
11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | # Copyright (c) P.J.Gawthrop, 1997. ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.1 1997/05/22 08:48:21 peterg ## Initial revision ## ############################################################### awk ' { name_index[$4"_"$3]=$2; } END{ N=split(names,Names,","); | > > > > > > | | < > | 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 | # Copyright (c) P.J.Gawthrop, 1997. ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.2 1997/05/22 09:28:22 peterg ## Removed trailing , in output. ## ## Revision 1.1 1997/05/22 08:48:21 peterg ## Initial revision ## ############################################################### awk ' { name_index[$4"_"$3]=$2; } END{ N=split(names,Names,","); if (N==0) printf("0\n") else { for (i=1; i<N; i++) printf("%i,",name_index[Names[i]]); printf("%i\n",name_index[Names[N]]); } }' names=$2 < $1_struc.txt |