Overview
Comment:Don't list components starting with 0 ot 1
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: a0cacb95f997701d90653a46f403f5b5c520c479153e5b1732731bf7acdd96f7
User & Date: gawthrop@users.sourceforge.net on 1999-08-25 21:20:07.000
Other Links: branch diff | manifest | tags
Context
1999-08-25
21:45:03
Spurious start to vector 0 and 1 check-in: 05cf66f40c user: gawthrop@users.sourceforge.net tags: origin/master, trunk
21:20:07
Don't list components starting with 0 ot 1 check-in: a0cacb95f9 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1999-08-19
21:26:55
Tidied title check-in: d41a7c17c5 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
︙
9
10
11
12
13
14
15



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







+
+
+







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

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.5  1996/11/09 21:09:43  peterg
## Added lib path.
##
# Revision 1.4  1996/11/03  21:19:55  peterg
# Generates generic commands in form $1name$2.
#
## Revision 1.3  1996/11/01 12:48:21  peterg
## Run mtt in quiet mode.
##
## Revision 1.2  1996/10/20 19:22:41  peterg
︙
35
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
69
70
71
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

69
70
71
72
73
74
75
76
77







+
+
+
















-
+




-
+








echo "# File $1_sub.sh"			>> $1_sub.sh
echo "# Generated by MTT on `date`."	>> $1_sub.sh
echo					>> $1_sub.sh

# Get a list of all components for the _cmp file
awk '/comp_type = / {print substr($3,2,length($3)-3)}' $1_cmp.m |\
sort -u > mtt_tmp1

# Remove all components starting with 0 or 1
grep -v '^[01]' < mtt_tmp1 > mtt_tmp4

# Get a list of all standard simple components
ls $MTTPATH/lib/comp/simple |\
  awk '/_cause.m/{split($1,a,"_");print(a[1])}'  >mtt_tmp2

# Get a list of all standard compound components
#ls $MTTPATH/comp/compound |\
#  awk '/_abg.m/{split($1,a,"_");print(a[1])}'  >> mtt_tmp2

# Sorted combined list
cat mtt_tmp2 | \
  sed  's/^zero$/0/' |\
  sed  's/^one$/1/' |\
  sort -u >mtt_tmp3

# Print the non-standard components
comm mtt_tmp1 mtt_tmp3 |\
comm mtt_tmp4 mtt_tmp3 |\
  awk 'BEGIN{FS="\t"}{if (length($1)>0) print "$1" $1 "$2"}' \
  >>$1_sub.sh

# Clean up mtt_tmp files
rm -f mtt_tmp1 mtt_tmp2
#rm -f mtt_tmp?









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