diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-23 17:57:53 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-23 17:57:53 (GMT) |
commit | 90913ce1f8b0d59e50df2ce83b0ae1d6dbba2c20 (patch) | |
tree | 2a462af99f91404a44e4874794afe8d70f2402e2 /generic/tkTextMark.c | |
parent | 443d48db54020f3091bba30b8b3cc04651d2c501 (diff) | |
download | tk-90913ce1f8b0d59e50df2ce83b0ae1d6dbba2c20.zip tk-90913ce1f8b0d59e50df2ce83b0ae1d6dbba2c20.tar.gz tk-90913ce1f8b0d59e50df2ce83b0ae1d6dbba2c20.tar.bz2 |
Another round of int -> Tcl_Size. Use more (char *)NULL in stead of simply NULL. Re-generate stub table, only creating dummy stub entries for TCL_MAJOR_VERSION < 9
Diffstat (limited to 'generic/tkTextMark.c')
-rw-r--r-- | generic/tkTextMark.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tkTextMark.c b/generic/tkTextMark.c index b25e4dd..db1dec1 100644 --- a/generic/tkTextMark.c +++ b/generic/tkTextMark.c @@ -144,7 +144,7 @@ TkTextMarkCmd( Tcl_SetObjResult(interp, Tcl_ObjPrintf( "there is no mark named \"%s\"", str)); Tcl_SetErrorCode(interp, "TK", "LOOKUP", "TEXT_MARK", str, - NULL); + (char *)NULL); return TCL_ERROR; } markPtr = (TkTextSegment *)Tcl_GetHashValue(hPtr); @@ -170,7 +170,7 @@ TkTextMarkCmd( } else { Tcl_SetObjResult(interp, Tcl_ObjPrintf( "bad mark gravity \"%s\": must be left or right", str)); - Tcl_SetErrorCode(interp, "TK", "VALUE", "MARK_GRAVITY", NULL); + Tcl_SetErrorCode(interp, "TK", "VALUE", "MARK_GRAVITY", (char *)NULL); return TCL_ERROR; } TkTextMarkSegToIndex(textPtr, markPtr, &index); |