X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=tests%2Ftest-floorf2.c;h=2d15a47be033ddbf7b784be89ab10207d003de43;hb=46f5f314f34a08c9305758482d7d2fdb0e999d09;hp=6811728cc3b1c1bba850b37bd43be010b918bcd2;hpb=04da1cb11cf8285b944492aaa636dbd596ed5e74;p=gnulib.git diff --git a/tests/test-floorf2.c b/tests/test-floorf2.c index 6811728cc..2d15a47be 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-2014 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 @@ -31,6 +31,12 @@ #include "isnanf-nolibm.h" #include "macros.h" +/* MSVC with option -fp:strict refuses to compile constant initializers that + contain floating-point operations. Pacify this compiler. */ +#ifdef _MSC_VER +# pragma fenv_access (off) +#endif + /* The reference implementation, taken from lib/floor.c. */ @@ -63,8 +69,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;