summaryrefslogtreecommitdiffstats
path: root/generic/tclExecute.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclExecute.c')
-rw-r--r--generic/tclExecute.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index 189832f..4c36123 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -8734,7 +8734,9 @@ ExecuteExtendedBinaryMathOp(
switch (type2) {
case TCL_NUMBER_LONG:
l2 = *((const long *) ptr2);
+#ifndef TCL_WIDE_INT_IS_LONG
pwrLongExpon:
+#endif
if (l2 == 0) {
/*
* Anything to the zero power is 1.
@@ -8776,7 +8778,9 @@ ExecuteExtendedBinaryMathOp(
switch (type1) {
case TCL_NUMBER_LONG:
l1 = *((const long *)ptr1);
+#ifndef TCL_WIDE_INT_IS_LONG
pwrLongBase:
+#endif
switch (l1) {
case 0:
/*