diff --git a/tcl-SafeLdExp.patch b/tcl-SafeLdExp.patch
deleted file mode 100644
index 0248142..0000000
--- a/tcl-SafeLdExp.patch
+++ /dev/null
@@ -1,35 +0,0 @@
-? NSK1200002852A
-Index: generic/tclStrToD.c
-===================================================================
-RCS file: /cvsroot/tcl/tcl/generic/tclStrToD.c,v
-retrieving revision 1.39
-diff -u -r1.39 tclStrToD.c
---- generic/tclStrToD.c	7 Dec 2009 17:15:33 -0000	1.39
-+++ generic/tclStrToD.c	19 Feb 2010 02:42:35 -0000
-@@ -110,7 +110,6 @@
- static int mantBits;		/* Number of bits in a double's significand */
- static mp_int pow5[9];		/* Table of powers of 5**(2**n), up to
- 				 * 5**256 */
--static double tiny;		/* The smallest representable double */
- static int maxDigits;		/* The maximum number of digits to the left of
- 				 * the decimal point of a double. */
- static int minDigits;		/* The maximum number of digits to the right
-@@ -1490,8 +1489,8 @@
- 	goto returnValue;
-     }
-     retval = SafeLdExp(retval, machexp);
--    if (retval < tiny) {
--	retval = tiny;
-+    if (retval == 0.0) {
-+	retval = SafeLdExp(1.0, DBL_MIN_EXP * log2FLT_RADIX - mantBits);
-     }
- 
-     /*
-@@ -2245,7 +2244,6 @@
-      * the significand of a double.
-      */
- 
--    tiny = SafeLdExp(1.0, DBL_MIN_EXP * log2FLT_RADIX - mantBits);
-     maxDigits = (int) ((DBL_MAX_EXP * log((double) FLT_RADIX)
- 	    + 0.5 * log(10.)) / log(10.));
-     minDigits = (int) floor((DBL_MIN_EXP - DBL_MANT_DIG)
diff --git a/tcl.changes b/tcl.changes
index 48f2108..a30c856 100644
--- a/tcl.changes
+++ b/tcl.changes
@@ -1,9 +1,3 @@
--------------------------------------------------------------------
-Fri Feb 19 19:36:17 CET 2010 - max@suse.de
-
-- Add tcl-SafeLdExp.patch to prevent a floating point assist fault
-  during startup on IA64 (bnc#578068).
-
 -------------------------------------------------------------------
 Thu Jan 21 12:55:33 CET 2010 - rguenther@suse.de
 
diff --git a/tcl.spec b/tcl.spec
index f5b2430..e92e755 100644
--- a/tcl.spec
+++ b/tcl.spec
@@ -42,7 +42,6 @@ Source3:        macros.tcl
 Patch0:         tcl.patch
 Patch1:         tcl-unload.patch
 Patch2:         tcl-fortify.patch
-Patch3:         tcl-SafeLdExp.patch
 
 %description
 Tcl (Tool Command Language) is a very powerful but easy to learn
@@ -91,7 +90,6 @@ Authors:
 %patch0
 %patch1
 %patch2
-%patch3
 
 %build
 cd unix