diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-03 13:04:11 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-03 13:04:11 (GMT) |
commit | 8f18e27691fabd477dde7d468fa26440ed5da4c2 (patch) | |
tree | f3144bc98fc8d86e5280161af618ff65096bbc1a /generic/tcl.h | |
parent | 7f3d1257ffc45e37ee8c71b666c37088eb2f1c48 (diff) | |
download | tcl-8f18e27691fabd477dde7d468fa26440ed5da4c2.zip tcl-8f18e27691fabd477dde7d468fa26440ed5da4c2.tar.gz tcl-8f18e27691fabd477dde7d468fa26440ed5da4c2.tar.bz2 |
Adapt type-casts to Tcl 9.0 signature of Tcl_Free/Tcl_Realloc/Tcl_AttemptRealloc
Diffstat (limited to 'generic/tcl.h')
-rw-r--r-- | generic/tcl.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index 1a1452e..ec78052 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -2377,9 +2377,9 @@ EXTERN const char *TclZipfs_AppHook(int *argc, char ***argv); # define attemptckalloc Tcl_AttemptAlloc # ifdef _MSC_VER /* Silence invalid C4090 warnings */ -# define ckfree(a) Tcl_Free((char *)(a)) -# define ckrealloc(a,b) Tcl_Realloc((char *)(a),(b)) -# define attemptckrealloc(a,b) Tcl_AttemptRealloc((char *)(a),(b)) +# define ckfree(a) Tcl_Free((void *)(a)) +# define ckrealloc(a,b) Tcl_Realloc((void *)(a),(b)) +# define attemptckrealloc(a,b) Tcl_AttemptRealloc((void *)(a),(b)) # else # define ckfree Tcl_Free # define ckrealloc Tcl_Realloc |