on master help sign in
Drop a weird, and seemingly unnecessary, INLINE of append
1099412Bryan O'Sullivan
Data/Text.hs+1−1
@@ -430,7 +430,7 @@ append a@(Text arr1 off1 len1) b@(Text arr2 off2 len2)
430 A.copyI arr 0 arr1 off1 len1
430 A.copyI arr 0 arr1 off1 len1
431 A.copyI arr len1 arr2 off2 len
431 A.copyI arr len1 arr2 off2 len
432 return arr
432 return arr
433−{-# INLINE append #-}
433+{-# NOINLINE append #-}
434
434
435{-# RULES
435{-# RULES
436"TEXT append -> fused" [~1] forall t1 t2.
436"TEXT append -> fused" [~1] forall t1 t2.