fix initialization of default value for "xschem get_logic_net"

This commit is contained in:
stefan schippers 2023-10-08 11:32:56 +02:00
parent 62bc3759f0
commit 58af2567e6
3 changed files with 11 additions and 6 deletions

View File

@ -2332,7 +2332,9 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
*/
else if(!strcmp(argv[1], "logic_get_net"))
{
static char s[2]="X";
static char s[2];
my_strncpy(s, "X", S(s));
if(!xctx) {Tcl_SetResult(interp, not_avail, TCL_STATIC); return TCL_ERROR;}
Tcl_ResetResult(interp);
if(argc > 2) {

View File

@ -1,4 +1,5 @@
v {xschem version=3.0.0 file_version=1.2 }
v {xschem version=3.4.5 file_version=1.2
}
G {}
K {type=switch
function1="0 Z 3 m"
@ -15,7 +16,7 @@ L 4 10 10 30 10 {}
L 4 -10 0 10 0 {}
L 4 -20 -5 -10 0 {}
L 4 -20 5 -10 0 {}
B 5 -32.5 -2.5 -27.5 2.5 {name=t0 dir=inout}
B 5 -32.5 -2.5 -27.5 2.5 {name=t0 dir=inout goto=1,2}
B 5 27.5 7.5 32.5 12.5 {name=t1 dir=inout }
B 5 27.5 -12.5 32.5 -7.5 {name=t2 dir=inout }
B 5 -2.5 -42.5 2.5 -37.5 {name=g dir=inout goto=1,2}

View File

@ -1,8 +1,10 @@
v {xschem version=3.0.0 file_version=1.2 }
v {xschem version=3.4.5 file_version=1.2
}
G {}
K {type=switch
function0="1 2 3 m"
template="name=s1"
format="* @name @pinlist @symname"
}
V {}
S {}
@ -15,8 +17,8 @@ L 4 -10 0 10 0 {}
L 4 -20 0 -10 -5 {}
L 4 -20 0 -10 5 {}
B 5 -32.5 -2.5 -27.5 2.5 {name=t0 dir=inout}
B 5 27.5 7.5 32.5 12.5 {name=t1 dir=inout }
B 5 27.5 -12.5 32.5 -7.5 {name=t2 dir=inout }
B 5 27.5 7.5 32.5 12.5 {name=t1 dir=inout goto=0}
B 5 27.5 -12.5 32.5 -7.5 {name=t2 dir=inout goto=0}
B 5 -2.5 -42.5 2.5 -37.5 {name=g dir=inout goto=0}
A 4 -8.75 0 1.25 360 360 {fill=true}
A 4 10 -10 1.25 0 360 {fill=true}