Canonicalize X u< X to UNORDERED_EXPR

2016-05-02  Marc Glisse  <marc.glisse@inria.fr>

gcc/
	* match.pd (X u< X, X u> X): New transformations.

gcc/testsuite/
	* gcc.dg/tree-ssa/unord.c: New testcase.

From-SVN: r235761

gcc/ChangeLog

 2016-05-02  Marc Glisse  <marc.glisse@inria.fr>
 
+	* match.pd (X u< X, X u> X): New transformations.
+
+2016-05-02  Marc Glisse  <marc.glisse@inria.fr>
+
 	* flag-types.h (enum warn_strict_overflow_code): Move ...
 	* coretypes.h: ... here.
 	* fold-const.h (fold_overflow_warning): Declare.

gcc/match.pd

@@ -1921,6 +1921,10 @@ DEFINE_INT_AND_FLOAT_ROUND_FN (RINT)
  (simplify
   (cmp @0 @0)
   { constant_boolean_node (true, type); }))
+(for cmp (unlt ungt)
+ (simplify
+  (cmp @0 @0)
+  (unordered @0 @0)))
 (simplify
  (ltgt @0 @0)
  (if (!flag_trapping_math)

gcc/testsuite/ChangeLog

 2016-05-02  Marc Glisse  <marc.glisse@inria.fr>
 
+	* gcc.dg/tree-ssa/unord.c: New testcase.
+
+2016-05-02  Marc Glisse  <marc.glisse@inria.fr>
+
 	* gcc.dg/tree-ssa/20040305-1.c: Adjust.
 
 2016-05-02  Nathan Sidwell  <nathan@codesourcery.com>

gcc/testsuite/gcc.dg/tree-ssa/unord.c

+/* { dg-do compile } */
+/* { dg-options "-O -fdump-tree-optimized" } */
+
+int f(double a){double b=a;return !__builtin_islessequal(a,b);}
+int g(double a){double b=a;return !__builtin_isgreaterequal(a,b);}
+
+/* { dg-final { scan-tree-dump-times " unord " 2 "optimized" } } */