Add clones of fp-cmp-1 for float/long double; Change name of unknown register

From-SVN: r28296

gcc/testsuite/gcc.c-torture/ChangeLog

+1999-07-27  Michael Meissner  <meissner@cygnus.com>
+
+	* execute/ieee/fp-cmp-2.c: New file, clone from fp-cmp-1.c,
+	converting double to float.
+
+	* execute/ieee/fp-cmp-3.c: New file, clone from fp-cmp-1.c,
+	converting double to long double.
+
+	* noncompile/920507-1.c (x): Rename asm register from fr1 to
+	unknown_register, since fr1 is a legitimate register on some
+	machines.
+
 1999-06-23  Nick Clifton  <nickc@cygnus.com>
 
 	* compile/dll.c: New test case.  Check that dll attributes

gcc/testsuite/gcc.c-torture/execute/ieee/fp-cmp-2.c

+#include <signal.h>
+
+float nan = 1.0f/0.0f - 1.0f/0.0f;
+float x = 1.0f;
+
+void leave ()
+{
+  exit (0);
+}
+
+main ()
+{
+#if ! defined (__vax__) && ! defined (_CRAY)
+  /* Move this line earlier, for architectures (like alpha) that issue 
+     SIGFPE on the first comparisons. */
+#ifndef SIGNAL_SUPPRESS
+  /* Some machines catches a SIGFPE when a NaN is compared.
+     Let this test succeed o such machines.  */
+  signal (SIGFPE, leave);
+#endif
+  /* NaN is an IEEE unordered operand.  All these test should be false.  */
+  if (nan == nan)
+    abort ();
+  if (nan != x)
+    x = 1.0;
+  else
+    abort ();
+
+  if (nan < x)
+    abort ();
+  if (nan > x)
+    abort ();
+  if (nan <= x)
+    abort ();
+  if (nan >= x)
+    abort ();
+  if (nan == x)
+    abort ();
+#endif
+  exit (0);
+}

gcc/testsuite/gcc.c-torture/execute/ieee/fp-cmp-3.c

+#include <signal.h>
+
+long double nan = 1.0l/0.0l - 1.0l/0.0l;
+long double x = 1.0l;
+
+void leave ()
+{
+  exit (0);
+}
+
+main ()
+{
+#if ! defined (__vax__) && ! defined (_CRAY)
+  /* Move this line earlier, for architectures (like alpha) that issue 
+     SIGFPE on the first comparisons. */
+#ifndef SIGNAL_SUPPRESS
+  /* Some machines catches a SIGFPE when a NaN is compared.
+     Let this test succeed o such machines.  */
+  signal (SIGFPE, leave);
+#endif
+  /* NaN is an IEEE unordered operand.  All these test should be false.  */
+  if (nan == nan)
+    abort ();
+  if (nan != x)
+    x = 1.0;
+  else
+    abort ();
+
+  if (nan < x)
+    abort ();
+  if (nan > x)
+    abort ();
+  if (nan <= x)
+    abort ();
+  if (nan >= x)
+    abort ();
+  if (nan == x)
+    abort ();
+#endif
+  exit (0);
+}

gcc/testsuite/gcc.c-torture/noncompile/920507-1.c

-x(){register*a asm("fr1");int*v[1]={a};}
+x(){register*a asm("unknown_register");int*v[1]={a};}