990117-1.c: New test from Horst von Brand.
authorJeffrey A Law <law@cygnus.com>
Sat, 16 Jan 1999 23:16:58 +0000 (23:16 +0000)
committerJeff Law <law@gcc.gnu.org>
Sat, 16 Jan 1999 23:16:58 +0000 (16:16 -0700)
        * gcc.c-torture/compile/990117-1.c: New test from Horst von Brand.
        * gcc.c-torture/compile/990117-2.c: Likewise.

From-SVN: r24710

gcc/testsuite/ChangeLog
gcc/testsuite/gcc.c-torture/compile/990117-2.c [new file with mode: 0644]

index 5e4d4673d688c38c902677490658666dff4b02ff..b0c74cdbb28f87a1bc5467ac0f0b0ee1f591007a 100644 (file)
@@ -1,6 +1,8 @@
 Sun Jan 17 00:02:33 1999  Jeffrey A Law  (law@cygnus.com)
 
        * gcc.c-torture/compile/990117-1.c: New test from Horst von Brand.
+       * gcc.c-torture/compile/990117-2.c: Likewise.
+
        * gcc.c-torture/execute/990117-1.c: New test from HJ Lu.
 
 Fri Jan 15 02:52:00 1999  Jeffrey A Law  (law@cygnus.com)
diff --git a/gcc/testsuite/gcc.c-torture/compile/990117-2.c b/gcc/testsuite/gcc.c-torture/compile/990117-2.c
new file mode 100644 (file)
index 0000000..8ca9c1e
--- /dev/null
@@ -0,0 +1,9 @@
+__complex__ float
+f(__complex__ float x)
+{
+  __complex__ float res;
+
+  if (__real__ x == 0.0)
+    res = x;
+  return res;
+}