X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=tests%2Ftest-floorf2.c;h=87fa27a79c30e14719292e0bfb45853a27edb3f3;hb=5b9e0c3ce734b9d9b0c0001e31b65a8a4713700d;hp=b26a508351d875fb38177d05ebdce6e318fff3e2;hpb=ba564f2164f381af846d9695e6465cffe7ec918c;p=gnulib.git diff --git a/tests/test-floorf2.c b/tests/test-floorf2.c index b26a50835..87fa27a79 100644 --- a/tests/test-floorf2.c +++ b/tests/test-floorf2.c @@ -1,5 +1,5 @@ /* Test of rounding towards negative infinity. - Copyright (C) 2007-2010 Free Software Foundation, Inc. + Copyright (C) 2007-2011 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -63,8 +63,12 @@ floorf_reference (DOUBLE x) if (z > L_(0.0)) { + /* For 0 < x < 1, return +0.0 even if the current rounding mode is + FE_DOWNWARD. */ + if (z < L_(1.0)) + z = L_(0.0); /* Avoid rounding errors for values near 2^k, where k >= MANT_DIG-1. */ - if (z < TWO_MANT_DIG) + else if (z < TWO_MANT_DIG) { /* Round to the next integer (nearest or up or down, doesn't matter). */ z += TWO_MANT_DIG; @@ -76,6 +80,9 @@ floorf_reference (DOUBLE x) } else if (z < L_(0.0)) { + /* Work around ICC's desire to optimize denormal floats to 0. */ + if (z > -FLT_MIN) + return L_(-1.0); /* Avoid rounding errors for values near -2^k, where k >= MANT_DIG-1. */ if (z > - TWO_MANT_DIG) {