From 714724561de0407911171023888616fd0f17e95a Mon Sep 17 00:00:00 2001 From: stefan schippers Date: Mon, 6 Nov 2023 16:59:14 +0100 Subject: [PATCH] add a catch {} in execute_fileevent (non existent ..._simulate_id var) --- src/xschem.tcl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/xschem.tcl b/src/xschem.tcl index 0c7d4093..5ccf0066 100644 --- a/src/xschem.tcl +++ b/src/xschem.tcl @@ -270,7 +270,7 @@ proc execute_fileevent {id} { if {[info exists execute(callback,$id)] && $execute(callback,$id) ne {}} { eval uplevel #0 [list $execute(callback,$id)] } - unset tctx::[xschem get current_win_path]_simulate_id + catch {unset tctx::[xschem get current_win_path]_simulate_id} catch {unset execute(callback,$id)} set execute(cmd,last) $execute(cmd,$id) set execute(data,last) $execute(data,$id)