@@ -2633,7 +2633,12 @@ DEFINE_INT_AND_FLOAT_ROUND_FN (RINT)
(if (GENERIC)
(truth_andif
(ge @0 { build_real (TREE_TYPE (@0), dconst0); })
- (cmp @0 { build_real (TREE_TYPE (@0), c2); }))))))))))))
+ (cmp @0 { build_real (TREE_TYPE (@0), c2); })))))))))
+ /* Transform sqrt(x) cmp sqrt(y) -> x cmp y. */
+ (simplify
+ (cmp (sq @0) (sq @1))
+ (if (! HONOR_NANS (@0))
+ (cmp @0 @1))))))
/* Fold A /[ex] B CMP C to A CMP B * C. */
(for cmp (eq ne)
new file mode 100644
@@ -0,0 +1,28 @@
+/* { dg-do compile } */
+/* { dg-require-effective-target c99_runtime } */
+/* { dg-options "-O2 -fdump-tree-optimized -funsafe-math-optimizations -fno-math-errno -ffinite-math-only" } */
+
+#define FOO(type, cmp, suffix, no) \
+int f_##no(type x, type y) \
+{ \
+ type gen_##no(); \
+ type xs = __builtin_sqrt##suffix((gen_##no())); \
+ type xy = __builtin_sqrt##suffix((gen_##no())); \
+ return (xs cmp xy); \
+}
+
+#define GEN_FOO(type, suffix) \
+FOO(type, <, suffix, suffix##1) \
+FOO(type, <=, suffix, suffix##2) \
+FOO(type, >, suffix, suffix##3) \
+FOO(type, >=, suffix, suffix##4) \
+FOO(type, ==, suffix, suffix##5) \
+FOO(type, !=, suffix, suffix##6)
+
+GEN_FOO(float, f)
+GEN_FOO(double, )
+GEN_FOO(long double, l)
+
+/* { dg-final { scan-tree-dump-not "__builtin_sqrtf" "optimized" } } */
+/* { dg-final { scan-tree-dump-not "__builtin_sqrt" "optimized" } } */
+/* { dg-final { scan-tree-dump-not "__builtin_sqrtl" "optimized" } } */