X-Git-Url: https://oss.titaniummirror.com/gitweb?a=blobdiff_plain;f=gcc%2Ftestsuite%2Fgcc.c-torture%2Fexecute%2Fieee%2Fmzero2.c;fp=gcc%2Ftestsuite%2Fgcc.c-torture%2Fexecute%2Fieee%2Fmzero2.c;h=0000000000000000000000000000000000000000;hb=6fed43773c9b0ce596dca5686f37ac3fc0fa11c0;hp=0da53d247377878660b440de81ef2c1b1449a5c2;hpb=27b11d56b743098deb193d510b337ba22dc52e5c;p=msp430-gcc.git diff --git a/gcc/testsuite/gcc.c-torture/execute/ieee/mzero2.c b/gcc/testsuite/gcc.c-torture/execute/ieee/mzero2.c deleted file mode 100644 index 0da53d24..00000000 --- a/gcc/testsuite/gcc.c-torture/execute/ieee/mzero2.c +++ /dev/null @@ -1,58 +0,0 @@ -/* Test IEEE +0/-0 rules */ - -static double pzero = +0.0; -static double nzero = -0.0; -static double pinf = +1.0 / 0.0; -static double ninf = -1.0 / 0.0; -static double nan = 0.0 / 0.0; - -void -expect (double value, double expected) -{ - if (expected != expected) /* expected value is Not a number */ - { - if (value == value) /* actual value is a number */ - abort (); - } - - else if (value != value) - abort (); /* actual value is a NaN */ - - else if (memcmp ((void *)&value, (void *)&expected, sizeof (double)) != 0) - abort (); /* values don't match */ -} - -main () -{ - expect (pzero + pzero, pzero); - expect (pzero + nzero, pzero); - expect (nzero + pzero, pzero); - expect (nzero + nzero, nzero); - - expect (pzero - pzero, pzero); - expect (pzero - nzero, pzero); - expect (nzero - pzero, nzero); - expect (nzero - nzero, pzero); - - expect (pzero * pzero, pzero); - expect (pzero * nzero, nzero); - expect (nzero * pzero, nzero); - expect (nzero * nzero, pzero); - - expect (+1.00 * pzero, pzero); - expect (-1.00 * pzero, nzero); - expect (+1.00 * nzero, nzero); - expect (-1.00 * nzero, pzero); - - expect (pzero / pzero, nan); - expect (pzero / nzero, nan); - expect (nzero / pzero, nan); - expect (nzero / nzero, nan); - - expect (+1.00 / pzero, pinf); - expect (-1.00 / pzero, ninf); - expect (+1.00 / nzero, ninf); - expect (-1.00 / nzero, pinf); - - exit (0); -}