revert format of [xschem pinlist <instance> <attr>] to old (3.1.0) format: { {0} {PLUS} } { {1} {OUT} } { {2} {MINUS} } instead of {PLUS} {OUT} {MINUS}

This commit is contained in:
stefan schippers 2023-08-19 13:54:43 +02:00
parent e3b9e67cb8
commit 3f55893987
1 changed files with 2 additions and 2 deletions

View File

@ -2453,9 +2453,9 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
for(p=0;p<no_of_pins;p++) {
if(first == 0) Tcl_AppendResult(interp, " ", NULL);
if(argc > 3 && argv[3][0]) {
Tcl_AppendResult(interp, "{",
Tcl_AppendResult(interp, "{ {", my_itoa(p), "} {",
get_tok_value((xctx->inst[i].ptr+ xctx->sym)->rect[PINLAYER][p].prop_ptr, argv[3], 0),
"}", NULL);
"} }", NULL);
} else {
Tcl_AppendResult(interp, "{ {", my_itoa(p), "} {",
(xctx->inst[i].ptr+ xctx->sym)->rect[PINLAYER][p].prop_ptr, "} }", NULL);