10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
+
+
+
|
# Hacked from (now redundent) abg2lbl_txt
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.2 2002/12/06 11:45:57 gawthrop
## Strips comments from _cmp.txt before processing
##
## Revision 1.1 2002/12/01 14:54:52 gawthrop
## Replaces defunct abg2lbl_fig2txt
##
##
## Old log from abg2lbl_fig2txt
## Revision 1.28 2002/10/30 00:04:22 gawthrop
## Added AEf and AFe to list
|
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
|
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
|
-
+
+
+
+
+
+
+
-
+
+
+
|
#Write out the outline lbl file
strip_comments <$1_cmp.txt | grep -v '\[[0-9]*\]' | \
gawk --field-separator ':' '
BEGIN {
OldComponent="None";
default_cr = "lin";
}
{
(NF == 1) {
Component = $1 " (anonymous => default parameters)";
Name = "# " $1;
cr[Component] = "\t";
arg[Component] = "\t";
}
(NF > 1) {
Component = $1;
Name = $2;
Arg = $3;
}
{
##Aliases
if (Component == "SS") {
port_alias[++j] = Name;
Component_type = Component;
}
else {
alias[++i] = Name;
if (length(sensitivity)>0) {
s_arg = sprintf("%ss",Name);
alias[++i] = s_arg;
s_arg = sprintf(";%s",s_arg);
|