From 13da0775446dc24645bdbe52a081899d46a94c88 Mon Sep 17 00:00:00 2001
From: Waldemar Brodkorb <wbx@openadk.org>
Date: Fri, 15 Jan 2010 08:18:18 +0100
Subject: make ag241 allmodconfig compile

---
 package/tcl/patches/patch-generic_tclStrToD_c | 30 +++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100644 package/tcl/patches/patch-generic_tclStrToD_c

(limited to 'package/tcl/patches/patch-generic_tclStrToD_c')

diff --git a/package/tcl/patches/patch-generic_tclStrToD_c b/package/tcl/patches/patch-generic_tclStrToD_c
new file mode 100644
index 000000000..95eceecf7
--- /dev/null
+++ b/package/tcl/patches/patch-generic_tclStrToD_c
@@ -0,0 +1,30 @@
+--- tcl8.5.8.orig/generic/tclStrToD.c	2009-07-16 22:50:54.000000000 +0200
++++ tcl8.5.8/generic/tclStrToD.c	2010-01-14 20:44:55.000000000 +0100
+@@ -73,9 +73,11 @@ typedef unsigned int fpu_control_t __att
+  * MIPS floating-point units need special settings in control registers
+  * to use gradual underflow as we expect.
+  */
++/*
+ #if defined(__mips)
+ #include <sys/fpu.h>
+ #endif
++*/
+ /*
+  * HP's PA_RISC architecture uses 7ff4000000000000 to represent a quiet NaN.
+  * Everyone else uses 7ff8000000000000. (Why, HP, why?)
+@@ -2166,6 +2168,7 @@ TclInitDoubleConversion(void)
+     } bitwhack;
+ #endif
+ 
++/*
+ #if defined(__mips)
+     union fpc_csr mipsCR;
+ 
+@@ -2173,6 +2176,7 @@ TclInitDoubleConversion(void)
+     mipsCR.fc_struct.flush = 0;
+     set_fpc_csr(mipsCR.fc_word);
+ #endif
++*/
+ 
+     /*
+      * Initialize table of powers of 10 expressed as wide integers.
-- 
cgit v1.2.3