Index: libcfa/prelude/builtins.c
===================================================================
--- libcfa/prelude/builtins.c	(revision db19e1d0d4adcc296ca7022c295f441155d4b6dc)
+++ libcfa/prelude/builtins.c	(revision 00f89a68c67ed1f843b1f38ee09f2ca4b4faf670)
@@ -10,6 +10,6 @@
 // Created On       : Fri Jul 21 16:21:03 2017
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Thu Feb  2 11:33:56 2023
-// Update Count     : 135
+// Last Modified On : Fri Nov  8 17:07:15 2024
+// Update Count     : 144
 //
 
@@ -140,9 +140,10 @@
 	) \
 	typeof(x) op = 1;									/* accumulate odd product */ \
+	typeof(x) w = x; /* FIX-ME: possible bug in the box pass changing value argument through parameter */ \
 	for ( ; y > 1; y >>= 1 ) {							/* squaring exponentiation, O(log2 y) */ \
-		if ( (y & 1) == 1 ) op = op * x;				/* odd ? */ \
-		x = x * x; \
+		if ( (y & 1) == 1 ) op = op * w;				/* odd ? */ \
+		w = w * w; \
 	} \
-	return x * op
+	return w * op
 #define __CFA_EXP_INT__(...) __VA_ARGS__