public inbox for gcc@gcc.gnu.org
 help / color / mirror / Atom feed
* A new test case
@ 1998-02-11 17:22 H.J. Lu
  1998-02-11 22:28 ` Jeffrey A Law
  0 siblings, 1 reply; 6+ messages in thread
From: H.J. Lu @ 1998-02-11 17:22 UTC (permalink / raw)
  To: egcs

This test failed on both egcs 1.0.1 and egcs 1.0.2 under Linux/x86.


-- 
H.J. Lu (hjl@gnu.org)
---
Wed Feb 11 17:09:18 1998  H.J. Lu  (hjl@gnu.org)

	* gcc.c-torture/execute/980211-1.c: New to test long double.

--- /dev/null	Wed Dec 31 16:00:00 1969
+++ gcc.c-torture/execute/980211-1.c	Wed Feb 11 17:09:00 1998
@@ -0,0 +1,22 @@
+__inline int
+__signbitl (long double __x)
+{
+  union { long double __l; int __i[3]; } __u = { __l: __x };
+
+  return (__u.__i[2] & 0x8000) != 0;
+}
+
+void
+foo (long double x, long double y)
+{
+  long double z = x / y;
+  if (__signbitl (x) && __signbitl (z))
+    abort ();
+}
+
+int main()
+{
+  if (sizeof (long double) > sizeof (double))
+    foo (-0.0, -1.0);
+  return 0;
+}

^ permalink raw reply	[flat|nested] 6+ messages in thread

end of thread, other threads:[~1998-02-13 10:31 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1998-02-11 17:22 A new test case H.J. Lu
1998-02-11 22:28 ` Jeffrey A Law
1998-02-12  2:36   ` Richard Henderson
1998-02-12  6:42     ` H.J. Lu
1998-02-13  2:28       ` Jeffrey A Law
1998-02-13 10:31         ` H.J. Lu

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).