diff options
Diffstat (limited to 'gcc/testsuite/gcc.c-torture/execute/990826-0.c')
-rw-r--r-- | gcc/testsuite/gcc.c-torture/execute/990826-0.c | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/gcc/testsuite/gcc.c-torture/execute/990826-0.c b/gcc/testsuite/gcc.c-torture/execute/990826-0.c new file mode 100644 index 000000000..2807ea348 --- /dev/null +++ b/gcc/testsuite/gcc.c-torture/execute/990826-0.c @@ -0,0 +1,27 @@ +/* +From: niles@fan745.gsfc.nasa.gov +To: fortran@gnu.org +Subject: Re: Scary problems in g77 for RedHat 6.0. (glibc-2.1) +Date: Sun, 06 Jun 1999 23:37:23 -0400 +X-UIDL: 9c1e40c572e3b306464f703461764cd5 +*/ + +#include <stdio.h> +#include <math.h> + +int +main() +{ + if (floor (0.1) != 0.) + abort (); + return 0; +} + +/* +It will result in 36028797018963968.000000 on Alpha RedHat Linux 6.0 +using glibc-2.1 at least on my 21064. This may result in g77 bug +reports concerning the INT() function, just so you know. + + Thanks, + Rick Niles. +*/ |