[GHC] #9496: Simplify primitives for short cut fusion