1 files changed, 16 insertions, 16 deletions

diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c
index e09d74d..e2d52b9 100644
--- a/generic/tclStubInit.c
+++ b/generic/tclStubInit.c
@@ -138,67 +138,67 @@ static const char *TclUtfPrev(const char *src, const char *start) {
 }
 
 int TclListObjGetElements(Tcl_Interp *interp, Tcl_Obj *listPtr,
-    ptrdiff_t *objcPtr, Tcl_Obj ***objvPtr) {
+    void *objcPtr, Tcl_Obj ***objvPtr) {
     int n, result = Tcl_ListObjGetElements(interp, listPtr, &n, objvPtr);
     if ((result == TCL_OK) && objcPtr) {
-	*objcPtr = n;
+	*(ptrdiff_t *)objcPtr = n;
     }
     return result;
 }
 int TclListObjLength(Tcl_Interp *interp, Tcl_Obj *listPtr,
-    ptrdiff_t *lengthPtr) {
+    void *lengthPtr) {
     int n;
     int result = Tcl_ListObjLength(interp, listPtr, &n);
     if ((result == TCL_OK) && lengthPtr) {
-	*lengthPtr = n;
+	*(ptrdiff_t *)lengthPtr = n;
     }
     return result;
 }
 int TclDictObjSize(Tcl_Interp *interp, Tcl_Obj *dictPtr,
-	ptrdiff_t *sizePtr) {
+	void *sizePtr) {
     int n, result = Tcl_DictObjSize(interp, dictPtr, &n);
     if ((result == TCL_OK) && sizePtr) {
-	*sizePtr = n;
+	*(ptrdiff_t *)sizePtr = n;
     }
     return result;
 }
-int TclSplitList(Tcl_Interp *interp, const char *listStr, ptrdiff_t *argcPtr,
+int TclSplitList(Tcl_Interp *interp, const char *listStr, void *argcPtr,
 	const char ***argvPtr) {
     int n;
     int result = Tcl_SplitList(interp, listStr, &n, argvPtr);
     if ((result == TCL_OK) && argcPtr) {
-	*argcPtr = n;
+	*(ptrdiff_t *)argcPtr = n;
     }
     return result;
 }
-void TclSplitPath(const char *path, ptrdiff_t *argcPtr, const char ***argvPtr) {
+void TclSplitPath(const char *path, void *argcPtr, const char ***argvPtr) {
     int n;
     Tcl_SplitPath(path, &n, argvPtr);
     if (argcPtr) {
-	*argcPtr = n;
+	*(ptrdiff_t *)argcPtr = n;
     }
 }
-Tcl_Obj *TclFSSplitPath(Tcl_Obj *pathPtr, ptrdiff_t *lenPtr) {
+Tcl_Obj *TclFSSplitPath(Tcl_Obj *pathPtr, void *lenPtr) {
     int n;
     Tcl_Obj *result = Tcl_FSSplitPath(pathPtr, &n);
     if (result && lenPtr) {
-	*lenPtr = n;
+	*(ptrdiff_t *)lenPtr = n;
     }
     return result;
 }
 int TclParseArgsObjv(Tcl_Interp *interp,
-	const Tcl_ArgvInfo *argTable, ptrdiff_t *objcPtr, Tcl_Obj *const *objv,
+	const Tcl_ArgvInfo *argTable, void *objcPtr, Tcl_Obj *const *objv,
 	Tcl_Obj ***remObjv) {
     int n, result;
-    if (*objcPtr > INT_MAX) {
+    if (*(ptrdiff_t *)objcPtr > INT_MAX) {
 	if (interp) {
 	    Tcl_AppendResult(interp, "Tcl_ParseArgsObjv cannot handle *objcPtr > INT_MAX", NULL);
 	}
 	return TCL_ERROR;
     }
-    n = (int)*objcPtr;
+    n = *(ptrdiff_t *)objcPtr;
     result = Tcl_ParseArgsObjv(interp, argTable, &n, objv, remObjv);
-    *objcPtr = n;
+    *(ptrdiff_t *)objcPtr = n;
     return result;
 }