xschem logic_get: return X instead of empty string if net has never been assigned
This commit is contained in:
parent
7bc63e0dfd
commit
847d1df1b3
|
|
@ -1864,7 +1864,7 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
|
||||||
*/
|
*/
|
||||||
else if(!strcmp(argv[1], "logic_get"))
|
else if(!strcmp(argv[1], "logic_get"))
|
||||||
{
|
{
|
||||||
static char s[2]=".";
|
static char s[2]="X";
|
||||||
Tcl_ResetResult(interp);
|
Tcl_ResetResult(interp);
|
||||||
if(argc > 2) {
|
if(argc > 2) {
|
||||||
Hilight_hashentry *entry;
|
Hilight_hashentry *entry;
|
||||||
|
|
@ -1887,8 +1887,8 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
|
||||||
s[0] = '2';
|
s[0] = '2';
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
Tcl_SetResult(interp, s, TCL_VOLATILE);
|
|
||||||
}
|
}
|
||||||
|
Tcl_SetResult(interp, s, TCL_VOLATILE);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue