Overview
| Comment: | Now writes an error message if a lable is used twice in the fig file. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
d808cfe780d6feb7147a9e264b1bfd02 |
| User & Date: | gawthrop@users.sourceforge.net on 1997-03-19 12:02:01 |
| Other Links: | branch diff | manifest | tags |
Context
|
1997-03-19
| ||
| 12:08:01 | No longer writes out non-unique names - now done in rbg_fig2m check-in: f9d502be67 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 12:02:01 | Now writes an error message if a lable is used twice in the fig file. check-in: d808cfe780 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 10:14:04 | Now produces a stripped acausal bond graph. check-in: f70119e3f8 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/awk/rbg_fig2m.awk from [c50df9036d] to [f978d62200].
| ︙ | ︙ | |||
8 9 10 11 12 13 14 15 16 17 18 19 20 21 | # Copyright (c) P.J.Gawthrop, 1996. ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ # Revision 1.18 1997/03/19 09:42:08 peterg # Now writes out the following additional fig files: # _head.fig The fig header # _bnd.fig The bonds actually used # _cmp.fig The components actually used. # # Revision 1.17 1997/01/02 11:21:17 peterg | > > > | 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 | # Copyright (c) P.J.Gawthrop, 1996. ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ # Revision 1.19 1997/03/19 09:49:39 peterg # Ports now written in cmp file. # # Revision 1.18 1997/03/19 09:42:08 peterg # Now writes out the following additional fig files: # _head.fig The fig header # _bnd.fig The bonds actually used # _cmp.fig The components actually used. # # Revision 1.17 1997/01/02 11:21:17 peterg |
| ︙ | ︙ | |||
262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 |
args = "";
label[i_label,1] = name;
label[i_label,2] = CR;
label[i_label,3] = args
}
# Give it a new entry if already used
if (name_used) {
i_label++;
i_name++;
name = sprintf("%1.0f", i_name);
label[i_label,1] = name;
label[i_label,2] = CR;
label[i_label,3] = args
}
| > > | 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 |
args = "";
label[i_label,1] = name;
label[i_label,2] = CR;
label[i_label,3] = args
}
# Give it a new entry if already used
# -- also tell user as it is an error now(?)
if (name_used) {
printf(warning_u, name);
i_label++;
i_name++;
name = sprintf("%1.0f", i_name);
label[i_label,1] = name;
label[i_label,2] = CR;
label[i_label,3] = args
}
|
| ︙ | ︙ | |||
451 452 453 454 455 456 457 |
fig_file = sprintf("%s_fig.fig", sys_name);
cmp_file = sprintf("%s_cmp.fig", sys_name);
bnd_file = sprintf("%s_bnd.fig", sys_name);
head_file = sprintf("%s_head.fig", sys_name);
warning_f = "WARNING %s \t in fig file but not lbl file - using\n";
warning_l = "WARNING %s \t in lbl file but not fig file - ignoring\n";
| | > | 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 |
fig_file = sprintf("%s_fig.fig", sys_name);
cmp_file = sprintf("%s_cmp.fig", sys_name);
bnd_file = sprintf("%s_bnd.fig", sys_name);
head_file = sprintf("%s_head.fig", sys_name);
warning_f = "WARNING %s \t in fig file but not lbl file - using\n";
warning_l = "WARNING %s \t in lbl file but not fig file - ignoring\n";
warning_p = "ERROR system ports are not consecutively numbered\n";
warning_u = "ERROR %s has already appeared in the fig file\n";
data_symbol = "----";
out_data_symbol = "\t";
default_cr = "";
default_args = "";
delimiter = ":";
repetition_delimiter = "*";
|
| ︙ | ︙ |