1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
+
+
+
|
#! /bin/sh
######################################
##### Model Transformation Tools #####
######################################
# Bourne shell script: rbg2abg_m
#
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.14 2000/09/14 08:41:35 peterg
## Strip off the additional direction info from rbonds
##
## Revision 1.13 2000/03/16 12:53:26 peterg
## Added copy of the %VAR declarations
## Put in the endfunction statement
##
## Revision 1.12 1998/07/28 19:07:48 peterg
## Writes out N_ports as well as n_ports
##
|
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
|
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
|
-
+
+
|
# fprintf(filenum, 'N_ports = %1.0f;\n', N_ports);
EOF
# Append any VAR declarations
if [ -f "$1_lbl.txt" ]; then
echo "# Explicit variable declarations" >> $1_abg.m
grep '^[\s]*[%|#]VAR' $1_lbl.txt | tr '%' '#' >> $1_abg.m
grep '^[\s]*[%|#][V|P]AR' $1_lbl.txt | tr '%' '#' >> $1_abg.m
grep '^[\s]*[%|#]NOT[V|P]AR' $1_lbl.txt | tr '%' '#' >> $1_abg.m
fi
## Close off the function
echo "endfunction" >> $1_abg.m
## Errors and info
if [ "$info" = "info" ]; then
|