on master help sign in
Fix typo.
0b0c021Bryan O'Sullivan
Data/Text/Fusion/Common.hs+1−1
@@ -782,7 +782,7 @@ filter p (Stream next0 s0 len) = Stream next s0 len -- HINT maybe too high
782{-# INLINE [0] filter #-}
782{-# INLINE [0] filter #-}
783
783
784{-# RULES
784{-# RULES
785− "Stream filter/filter fusion" forall p q s.
785+ "STREAM filter/filter fusion" forall p q s.
786 filter p (filter q s) = filter (\x -> q x && p x) s
786 filter p (filter q s) = filter (\x -> q x && p x) s
787 #-}
787 #-}
788
788