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

better xschem table_read command implementation

This commit is contained in:
stefan schippers 2023-02-10 18:08:45 +01:00
parent c51f007da3
commit f0a359e65a
1 changed files with 12 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/scheduler.c
View File

@ -2927,10 +2927,19 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
case 't': /*----------------------------------------------*/
if(!strcmp(argv[1], "table_read"))
{
if(argc > 2) {
if(sch_waves_loaded() >= 0) {
free_rawfile(1);
tclsetvar("rawfile_loaded", "0");
} else if(argc > 2) {
free_rawfile(0);
table_read(argv[2]);
Tcl_ResetResult(interp);
}
if(sch_waves_loaded() >= 0) {
tclsetvar("rawfile_loaded", "1");
draw();
}
else tclsetvar("rawfile_loaded", "0");
}
Tcl_ResetResult(interp);
}
else if(!strcmp(argv[1], "test"))