&& tree_nop_conversion_p (type, TREE_TYPE (@1)))
(lshift @0 @2)))
+/* Shifts by constants distribute over several binary operations,
+ hence (X << C) + (Y << C) can be simplified to (X + Y) << C. */
+(for op (plus minus)
+ (simplify
+ (op (lshift:s @0 @1) (lshift:s @2 @1))
+ (if (INTEGRAL_TYPE_P (type)
+ && TYPE_OVERFLOW_WRAPS (type)
+ && !TYPE_SATURATING (type))
+ (lshift (op @0 @2) @1))))
+
+(for op (bit_and bit_ior bit_xor)
+ (simplify
+ (op (lshift:s @0 @1) (lshift:s @2 @1))
+ (if (INTEGRAL_TYPE_P (type))
+ (lshift (op @0 @2) @1)))
+ (simplify
+ (op (rshift:s @0 @1) (rshift:s @2 @1))
+ (if (INTEGRAL_TYPE_P (type))
+ (rshift (op @0 @2) @1))))
+
/* Fold (1 << (C - x)) where C = precision(type) - 1
into ((1 << C) >> x). */
(simplify
--- /dev/null
+/* { dg-do compile } */
+/* { dg-options "-O2 -fdump-tree-optimized" } */
+
+unsigned int foo_plus(unsigned int a, unsigned int b)
+{
+ return (a << 2) + (b << 2);
+}
+
+unsigned int foo_and(unsigned int a, unsigned int b)
+{
+ return (a << 2) & (b << 2);
+}
+
+unsigned int foo_ior(unsigned int a, unsigned int b)
+{
+ return (a << 2) | (b << 2);
+}
+
+unsigned int foo_xor(unsigned int a, unsigned int b)
+{
+ return (a << 2) ^ (b << 2);
+}
+
+unsigned int bar_and(unsigned int a, unsigned int b)
+{
+ return (a >> 2) & (b >> 2);
+}
+
+unsigned int bar_ior(unsigned int a, unsigned int b)
+{
+ return (a >> 2) | (b >> 2);
+}
+
+unsigned int bar_xor(unsigned int a, unsigned int b)
+{
+ return (a >> 2) ^ (b >> 2);
+}
+
+int baz_and(int a, int b)
+{
+ return (a >> 2) & (b >> 2);
+}
+
+int baz_ior(int a, int b)
+{
+ return (a >> 2) | (b >> 2);
+}
+
+int baz_xor(int a, int b)
+{
+ return (a >> 2) ^ (b >> 2);
+}
+
+/* { dg-final { scan-tree-dump-times " << " 4 "optimized" } } */
+/* { dg-final { scan-tree-dump-times " >> " 6 "optimized" } } */
+