diff options
| author | Miodrag Milanovic <mmicko@gmail.com> | 2022-11-30 15:54:31 +0100 |
|---|---|---|
| committer | Miodrag Milanovic <mmicko@gmail.com> | 2022-11-30 15:54:31 +0100 |
| commit | b0469b3863037cdf7a82b413c7bb7e9d9ae855f3 (patch) | |
| tree | 900691e12d001acbfeab250e72d1d241e204111b /kernel/yosys.h | |
| parent | f9db7c0599d87fa7d61b72979029c5894e3dbe6b (diff) | |
| download | yosys-b0469b3863037cdf7a82b413c7bb7e9d9ae855f3.tar.gz yosys-b0469b3863037cdf7a82b413c7bb7e9d9ae855f3.tar.bz2 yosys-b0469b3863037cdf7a82b413c7bb7e9d9ae855f3.zip | |
Fix tcl crash in case of error executing command
Diffstat (limited to 'kernel/yosys.h')
| -rw-r--r-- | kernel/yosys.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/kernel/yosys.h b/kernel/yosys.h index b5b1553f2..29415ff84 100644 --- a/kernel/yosys.h +++ b/kernel/yosys.h @@ -82,6 +82,9 @@ # ifdef YOSYS_MXE_HACKS extern Tcl_Command Tcl_CreateCommand(Tcl_Interp *interp, const char *cmdName, Tcl_CmdProc *proc, ClientData clientData, Tcl_CmdDeleteProc *deleteProc); extern Tcl_Interp *Tcl_CreateInterp(void); +extern void Tcl_Preserve(ClientData data); +extern void Tcl_Release(ClientData clientData); +extern int Tcl_InterpDeleted(Tcl_Interp *interp); extern void Tcl_DeleteInterp(Tcl_Interp *interp); extern int Tcl_Eval(Tcl_Interp *interp, const char *script); extern int Tcl_EvalFile(Tcl_Interp *interp, const char *fileName); |