Changeset 544

Timestamp:

01/18/08 02:31:25 (11 months ago)

Author:

Don Clugston

Message:

Bugfix for feqrel() for systems with 64-bit reals.

Files:

• candidate/phobos/std/math.d (modified) (2 diffs)

candidate/phobos/std/math.d

@@ -1919 +1919 @@
-        const int EXPONENTPOS = 3;
-    else const int EXPONENTPOS = 0;
- ((pa[EXPONENTPOS]&0x7FF0) + (pb[EXPONENTPOS]&0x7FF0)-0x10)>>5
->>4)
+( ((pa[EXPONENTPOS]&0x7FF0) + (pb[EXPONENTPOS]&0x7FF0)-0x10)>>1
+))>>4
- }
-    if (pd[EXPONENTPOS] == 0)
@@ -1939 +1939 @@
-    return (bitsdiff == 0) ? (pa[EXPONENTPOS] == pb[EXPONENTPOS]) : 0;
- } else {
-(pa[EXPONENTPOS] ^ pb[EXPONENTPOS])&0x7FF0
+!((pa[EXPONENTPOS] ^ pb[EXPONENTPOS])&0x7FF0)
-    else return 0;
- }