Commits

Bryan O'Sullivan committed d61ffc2

Fix rules annotation

  • Participants
  • Parent commits aeb6070

Comments (0)

Files changed (1)

File Data/Text/Lazy.hs

 {-# INLINE [1] null #-}
 
 {-# RULES
-"TEXT null -> fused" [~1] forall t.
+"LAZY TEXT null -> fused" [~1] forall t.
     null t = S.null (stream t)
-"TEXT null -> unfused" [1] forall t.
+"LAZY TEXT null -> unfused" [1] forall t.
     S.null (stream t) = null t
  #-}