From: John David Anglin <dave.anglin@nrc-cnrc.gc.ca>
Date: Sun, 26 Sep 2004 19:37:56 +0000 (+0000)
Subject: pa.c (print_operand): Use non-trapping completers for UNLE...
X-Git-Tag: releases/gcc-4.0.0~4567
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=69049ba07afa22a5686db85e7e9a1602be795d62;p=thirdparty%2Fgcc.git

pa.c (print_operand): Use non-trapping completers for UNLE...

	* pa.c (print_operand): Use non-trapping completers for UNLE, UNLT,
	UNGE, UNGT, UNEQ, UNORDERED and ORDERED comparisons.

From-SVN: r88144
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 9c745f9e01b6..4268e3809f31 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2004-09-26  John David Anglin  <dave.anglin@nrc-cnrc.gc.ca>
+
+	* pa.c (print_operand): Use non-trapping completers for UNLE, UNLT,
+	UNGE, UNGT, UNEQ, UNORDERED and ORDERED comparisons.
+
 2004-09-26  Ulrich Weigand  <uweigand@de.ibm.com>
 
 	* builtins.c (expand_builtin_memcmp): Adjust MEM_SIZE to
diff --git a/gcc/config/pa/pa.c b/gcc/config/pa/pa.c
index a4edfeb19cb6..5f21e1750937 100644
--- a/gcc/config/pa/pa.c
+++ b/gcc/config/pa/pa.c
@@ -5102,7 +5102,10 @@ print_operand (FILE *file, rtx x, int code)
 	}
       return;
     /* For floating point comparisons.  Note that the output
-       predicates are the complement of the desired mode.  */
+       predicates are the complement of the desired mode.  The
+       conditions for GT, GE, LT, LE and LTGT cause an invalid
+       operation exception if the result is unordered and this
+       exception is enabled in the floating-point status register.  */
     case 'Y':
       switch (GET_CODE (x))
 	{
@@ -5121,19 +5124,19 @@ print_operand (FILE *file, rtx x, int code)
 	case LTGT:
 	  fputs ("!<>", file);  break;
 	case UNLE:
-	  fputs (">", file);  break;
+	  fputs ("!?<=", file);  break;
 	case UNLT:
-	  fputs (">=", file);  break;
+	  fputs ("!?<", file);  break;
 	case UNGE:
-	  fputs ("<", file);  break;
+	  fputs ("!?>=", file);  break;
 	case UNGT:
-	  fputs ("<=", file);  break;
+	  fputs ("!?>", file);  break;
 	case UNEQ:
-	  fputs ("<>", file);  break;
+	  fputs ("!?=", file);  break;
 	case UNORDERED:
-	  fputs ("<=>", file);  break;
+	  fputs ("!?", file);  break;
 	case ORDERED:
-	  fputs ("!<=>", file);  break;
+	  fputs ("?", file);  break;
 	default:
 	  abort ();
 	}