Make "shift" an "int" variable; since it's range is 0 < shift < INT_MAX

tcltk · Aug 25, 2023 · a951fd1 · a951fd1
1 parent 813e29b
commit a951fd1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/generic/tclExecute.c b/generic/tclExecute.c
@@ -8502,7 +8502,7 @@ ExecuteExtendedBinaryMathOp(
     mp_int big1, big2, bigResult, bigRemainder;
     Tcl_Obj *objResultPtr;
     int invalid, zero;
-    long shift;
+    int shift;
 
     (void) GetNumberFromObj(NULL, valuePtr, &ptr1, &type1);
     (void) GetNumberFromObj(NULL, value2Ptr, &ptr2, &type2);