Ticket #524: Float_sign.patch

Float.d

@@ -27 +27 @@
-
-private import Integer = tango.text.convert.Integer;
-
+private import tango.math.IEEE : signbit;
+
-private alias real NumType;
-
-private extern (C) NumType log10l(NumType x);
@@ -134 +136 @@
-                return digit + '0';
-        }
-
-        if (x !<>= x)
-            return "nan";
-
-        if (x is x.infinity)
-            return "inf";
-
-        int exp;
-        bool sign;
-
-        // extract the sign
-x < 0.0
+signbit(x)
-           {
-           x = -x;
-           sign = true;
-           }
-
+        if (x !<>= x)
+            return cast(T[])(sign ? "-nan" : "nan");
+
+        if (x is x.infinity)
+            return cast(T[])(sign ? "-inf" : "inf");
+
+        int exp;
+
-        // don't scale if zero
-        if (x > 0.0)
-           {