diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-11 13:15:02 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-11 13:15:02 (GMT) |
| commit | 3da3b0054408841413579f02a5788a1805c3c95d (patch) | |
| tree | 59ae004fee9c0ed91fd244d4c6534c647db748d8 /generic/tclIORChan.c | |
| parent | 26ced43951ad99e01e8f1f0deb64d7a15406ae62 (diff) | |
| parent | e299b24d9e4c924f678f91b00c5472f5f18e69e0 (diff) | |
| download | tcl-3da3b0054408841413579f02a5788a1805c3c95d.zip tcl-3da3b0054408841413579f02a5788a1805c3c95d.tar.gz tcl-3da3b0054408841413579f02a5788a1805c3c95d.tar.bz2 | |
Merge 8.6. Use Tcl_NewBooleanObj for booleans; we should say what we mean
Diffstat (limited to 'generic/tclIORChan.c')
| -rw-r--r-- | generic/tclIORChan.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIORChan.c b/generic/tclIORChan.c index 31ead91..4e938ae 100644 --- a/generic/tclIORChan.c +++ b/generic/tclIORChan.c @@ -884,7 +884,7 @@ TclChanPostEventObjCmd( if (hPtr == NULL) { Tcl_SetObjResult(interp, Tcl_ObjPrintf( "can not find reflected channel named \"%s\"", chanId)); - Tcl_SetErrorCode(interp, "TCL", "LOOKUP", "CHANNEL", chanId, (void *)NULL); + Tcl_SetErrorCode(interp, "TCL", "LOOKUP", "CHANNEL", chanId, (char *)NULL); return TCL_ERROR; } |