luke
/
netgen
mirror of https://github.com/RTimothyEdwards/netgen.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fixed the "cells -all" command so that it now matches the 

documentation, and behaves as intended, which is that "-all" is
not a standalone option but is itself an optional qualifier to
the "cells <valid_cellname>" command.  So the options are
"cells <valid_cellname>" and "cells -all <valid_cellname>".
This commit is contained in:
Tim Edwards 2017-06-19 20:22:59 -04:00
parent 05d4225e97
commit fdf2f32654
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tcltk/tclnetgen.c
View File

@ -1452,8 +1452,8 @@ _netgen_cells(ClientData clientData,
if (objc == 1) {
PrintCellHashTable((dolist) ? 2 : 0, -1);
}
else if (objc != 2) {
Tcl_WrongNumArgs(interp, 1, objv, "[list] [-all|-top|valid_filename]");
else if (objc != 2 && objc != 3) {
Tcl_WrongNumArgs(interp, 1, objv, "[list] -top|[-all] valid_filename");
return TCL_ERROR;
}
else {
@ -1484,7 +1484,7 @@ _netgen_cells(ClientData clientData,
return TCL_OK;
}
else if (strncmp(repstr, "-all", 4)) {
result = CommonParseCell(interp, objv[1], &np, &filenum);
result = CommonParseCell(interp, objv[2], &np, &filenum);
if (result != TCL_OK) return result;
}
PrintCellHashTable((dolist) ? 2 : 1, filenum);