Little patch to turn (shl (add X, 123), 4) -> (add (shl X, 4), 123 << 4)