Fix typo.
--HG--
extra : convert_revision : 60e0314159d59d4d5c6b07828c759fab2a15e829
commit0b0c0219c40d8da4e29c1335361ee19e76a11bf5
authorBryan O'Sullivan <bos@serpentine.com>
dateMon 30 Nov 2009, 06:46 (17 years ago)
parente92efff
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
782782{-# INLINE [0] filter #-}
783783
784784{-# RULES
785− "Stream filter/filter fusion" forall p q s.
785+ "STREAM filter/filter fusion" forall p q s.
786786 filter p (filter q s) = filter (\x -> q x && p x) s
787787 #-}
788788