diff options
| -rw-r--r-- | generic/tclEvent.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c index 55a32a0..6d7d968 100644 --- a/generic/tclEvent.c +++ b/generic/tclEvent.c @@ -1848,7 +1848,7 @@ Tcl_VwaitObjCmd( Tcl_SetObjResult(interp, Tcl_NewWideIntObj(diff)); } } else { - Tcl_RestoreInterpState(interp, saved); + result = Tcl_RestoreInterpState(interp, saved); } if (vwaitItems != localItems) { Tcl_Free(vwaitItems); |