12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
# Copyright (c) P.J.Gawthrop, 1997.
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.11 2000/08/01 07:34:33 peterg
## Replaced printf by echo
##
## Revision 1.10 2000/02/25 09:10:12 peterg
## Changed -e to -f in if [ -f "$crf" ]; then
## -- cuased probs on SUN
##
|
>
>
>
|
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.12 2002/04/08 17:04:21 geraint
## Removed spurious "\n" from output.
##
## Revision 1.11 2000/08/01 07:34:33 peterg
## Replaced printf by echo
##
## Revision 1.10 2000/02/25 09:10:12 peterg
## Changed -e to -f in if [ -f "$crf" ]; then
## -- cuased probs on SUN
##
|
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
|
echo >> $crfile
# Recursively create subsystem CR files -- at lower level
sh $1_sub.sh 'cr_txt2r ' ' _lower'
# Include subsystem CR files
sh $1_sub.sh 'echo ' "_cr.r" |\
awk '{
print "in \"" $1 "\";"
}' >> $crfile
## if [ -z "$level" ]; then
# Copy .cr files
awk '{
if (NF>0) {
print "mtt -q -u crcopy " $1;
}
}' $1_cr.txt | sh
# Include the .cr files
# awk '{
# if (NF>0) {
# print "in \"" $1 ".cr\";"
# }
# }' $1_cr.txt >> $crfile
## list of the crs
crs=`cat $1_cr.txt`
|
|
|
|
|
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
echo >> $crfile
# Recursively create subsystem CR files -- at lower level
sh $1_sub.sh 'cr_txt2r ' ' _lower'
# Include subsystem CR files
sh $1_sub.sh 'echo ' "_cr.r" |\
gawk '{
print "in \"" $1 "\";"
}' >> $crfile
## if [ -z "$level" ]; then
# Copy .cr files
gawk '{
if (NF>0) {
print "mtt -q -u crcopy " $1;
}
}' $1_cr.txt | sh
# Include the .cr files
# gawk '{
# if (NF>0) {
# print "in \"" $1 ".cr\";"
# }
# }' $1_cr.txt >> $crfile
## list of the crs
crs=`cat $1_cr.txt`
|