diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-08-30 06:53:35 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-08-30 06:53:35 (GMT) |
| commit | b3500c7657421cc9309d8b22a9e40b8d70bd2d00 (patch) | |
| tree | 4c197260b858e8d500091861685ed98984b29f69 | |
| parent | 1aa64a54f72a97753e3cc7e75eb93ac625d66a33 (diff) | |
| download | tcl-b3500c7657421cc9309d8b22a9e40b8d70bd2d00.zip tcl-b3500c7657421cc9309d8b22a9e40b8d70bd2d00.tar.gz tcl-b3500c7657421cc9309d8b22a9e40b8d70bd2d00.tar.bz2 | |
gcc warning (-Wc++-compat)
| -rw-r--r-- | generic/tclExecute.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index af93636..91cce46 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -6805,7 +6805,7 @@ TEBCresume( * stack. */ - *(++catchTop) = INT2PTR(CURR_DEPTH); + *(++catchTop) = (Tcl_Obj *)INT2PTR(CURR_DEPTH); TRACE(("%u => catchTop=%d, stackTop=%d\n", TclGetUInt4AtPtr(pc+1), (int) (catchTop - initCatchTop - 1), (int) CURR_DEPTH)); |