1 files changed, 20 insertions, 0 deletions
diff --git a/lang/gauche/files/patch-src-gauche-arith_i386.h b/lang/gauche/files/patch-src-gauche-arith_i386.h
new file mode 100644
index 000000000000..020d0040dc67
--- /dev/null
+++ b/lang/gauche/files/patch-src-gauche-arith_i386.h
@@ -0,0 +1,20 @@
+--- src/gauche/arith_i386.h.orig       Sun Sep 22 19:48:19 2002
++++ src/gauche/arith_i386.h    Sun Sep 22 19:49:05 2002
+@@ -23,6 +23,8 @@
+  *  r <- x + y + c  mod wordsize
+  *  c <- 1 if carry, 0 otherwise
+  */
++/* bad register voodoo... let the 'portable' version catch this.
++      fails on both 4.2-release and 5.0-current
+ 
+ #define UADD(r, c, x, y) \
+     asm("shrl $1, %2;" \
+@@ -32,7 +34,7 @@
+         "rcll $1, %1;" \
+            :"=&r" (r), "=&r" (c) \
+            :"1" (c), "g"(x), "g"(y))
+-
++*/
+ /*-----------------------------------------------------------------
+  * UADDOV(r, v, x, y)    unsigned word add with overflow check
+  *  u_long : r, v, x, y;