aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.9/gcc/testsuite/gcc.c-torture/execute/990826-0.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc-4.9/gcc/testsuite/gcc.c-torture/execute/990826-0.c')
-rw-r--r--gcc-4.9/gcc/testsuite/gcc.c-torture/execute/990826-0.c27
1 files changed, 27 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/testsuite/gcc.c-torture/execute/990826-0.c b/gcc-4.9/gcc/testsuite/gcc.c-torture/execute/990826-0.c
new file mode 100644
index 000000000..2807ea348
--- /dev/null
+++ b/gcc-4.9/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.
+*/