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 | ecdeff293a5b31cd00d928ecef9753e802c0b1db (patch) | |
| tree | 59ae004fee9c0ed91fd244d4c6534c647db748d8 /generic/tclIOCmd.c | |
| parent | 5221941a2ae530e1ff5b8ddb3c6558933d962c0c (diff) | |
| parent | 2943a2ce12be16a91b9d90058cc0ea8ec707e5e2 (diff) | |
| download | tcl-ecdeff293a5b31cd00d928ecef9753e802c0b1db.zip tcl-ecdeff293a5b31cd00d928ecef9753e802c0b1db.tar.gz tcl-ecdeff293a5b31cd00d928ecef9753e802c0b1db.tar.bz2 | |
Merge 8.6. Use Tcl_NewBooleanObj for booleans; we should say what we mean
Diffstat (limited to 'generic/tclIOCmd.c')
| -rw-r--r-- | generic/tclIOCmd.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIOCmd.c b/generic/tclIOCmd.c index f9d85b6..23adc18 100644 --- a/generic/tclIOCmd.c +++ b/generic/tclIOCmd.c @@ -447,7 +447,7 @@ Tcl_ReadObjCmd( Tcl_SetObjResult(interp, Tcl_ObjPrintf( "expected non-negative integer but got \"%s\"", TclGetString(objv[i]))); - Tcl_SetErrorCode(interp, "TCL", "VALUE", "NUMBER", (void *)NULL); + Tcl_SetErrorCode(interp, "TCL", "VALUE", "NUMBER", (char *)NULL); return TCL_ERROR; #if !defined(TCL_NO_DEPRECATED) } |