From a455c140eaab90a3f1f588ce4e8a841e2b260fa6 Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Thu, 10 Mar 2022 10:26:01 +0000
Subject: Unused variable warning

---
 generic/tclTestObj.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c
index 9081bcf..a235002 100644
--- a/generic/tclTestObj.c
+++ b/generic/tclTestObj.c
@@ -659,7 +659,9 @@ TestintobjCmd(
     Tcl_Obj *const objv[])	/* Argument objects. */
 {
     size_t varIndex;
+#if (INT_MAX != LONG_MAX)   /* int is not the same size as long */
     int i;
+#endif
     Tcl_WideInt wideValue;
     const char *subCmd;
     Tcl_Obj **varPtr;
-- 
cgit v0.12