summaryrefslogtreecommitdiffstats
path: root/gcc/testsuite
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite')
-rw-r--r--gcc/testsuite/ChangeLog5
-rw-r--r--gcc/testsuite/gcc.c-torture/execute/ieee/fp-cmp-6.c31
-rw-r--r--gcc/testsuite/gcc.c-torture/execute/ieee/fp-cmp-7.c14
3 files changed, 50 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index c438ad3c837..f9d63b210a7 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2003-03-27 Roger Sayle <roger@eyesopen.com>
+
+ * gcc.c-torture/execute/ieee/fp-cmp-6.c: New test case.
+ * gcc.c-torture/execute/ieee/fp-cmp-7.c: New test case.
+
2003-03-27 Mark Mitchell <mark@codesourcery.com>
* lib/gcov.exp (run-gcov): Add branches and calls options, rather
diff --git a/gcc/testsuite/gcc.c-torture/execute/ieee/fp-cmp-6.c b/gcc/testsuite/gcc.c-torture/execute/ieee/fp-cmp-6.c
new file mode 100644
index 00000000000..9111d6e5c46
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/execute/ieee/fp-cmp-6.c
@@ -0,0 +1,31 @@
+
+const double dnan = 1.0/0.0 - 1.0/0.0;
+double x = 1.0;
+
+extern void link_error ();
+
+main ()
+{
+#if ! defined (__vax__) && ! defined (_CRAY)
+ /* NaN is an IEEE unordered operand. All these test should be false. */
+ if (dnan == dnan)
+ link_error ();
+ if (dnan != x)
+ x = 1.0;
+ else
+ link_error ();
+
+ if (dnan < x)
+ link_error ();
+ if (dnan > x)
+ link_error ();
+ if (dnan <= x)
+ link_error ();
+ if (dnan >= x)
+ link_error ();
+ if (dnan == x)
+ link_error ();
+#endif
+ exit (0);
+}
+
diff --git a/gcc/testsuite/gcc.c-torture/execute/ieee/fp-cmp-7.c b/gcc/testsuite/gcc.c-torture/execute/ieee/fp-cmp-7.c
new file mode 100644
index 00000000000..385acafc204
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/execute/ieee/fp-cmp-7.c
@@ -0,0 +1,14 @@
+extern void link_error ();
+
+void foo(double x)
+{
+ if (x > __builtin_inf())
+ link_error ();
+}
+
+int main ()
+{
+ foo (1.0);
+ return 0;
+}
+
OpenPOWER on IntegriCloud