From 6fd38cd1bcd7cb05f4fb58f8e314ec893354219b Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Wed, 8 Nov 2023 22:33:13 +0000
Subject: Fix [18f2432b0db2bc08]: Tcl_FSSplitPath compiler warning about macros

---
 generic/tclCmdAH.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/generic/tclCmdAH.c b/generic/tclCmdAH.c
index 12216d4..3934b65 100644
--- a/generic/tclCmdAH.c
+++ b/generic/tclCmdAH.c
@@ -2212,7 +2212,7 @@ PathSplitCmd(
 	Tcl_WrongNumArgs(interp, 1, objv, "name");
 	return TCL_ERROR;
     }
-    res = Tcl_FSSplitPath(objv[1], NULL);
+    res = Tcl_FSSplitPath(objv[1], (Tcl_Size)NULL);
     if (res == NULL) {
 	Tcl_SetObjResult(interp, Tcl_ObjPrintf(
 		"could not read \"%s\": no such file or directory",
@@ -3109,7 +3109,8 @@ ForeachAssignments(
     Tcl_Interp *interp,
     struct ForeachState *statePtr)
 {
-    int i, v, k;
+    int i;
+    Tcl_Size v, k;
     Tcl_Obj *valuePtr, *varValuePtr;
 
     for (i=0 ; i<statePtr->numLists ; i++) {
-- 
cgit v0.12