git.iko.soy/text
on master help sign in
Tidy up some assert-related silliness
a9152d2Bryan O'Sullivan
Data/Text/Array.hs+3
compare with master
unifiedsplit
@@ -33,6 +33,9 @@ module Data.Text.Array
33 , copyM
33 , copyM
34 , copyI
34 , copyI
35 , empty
35 , empty
36+#if defined(ASSERTS)
37+ , length
38+#endif
36 , run
39 , run
37 , run2
40 , run2
38 , toList
41 , toList
Data/Text/Lazy/Builder.hs−3
@@ -29,9 +29,6 @@ module Data.Text.Lazy.Builder
29 , flush
29 , flush
30 ) where
30 ) where
31
31
32−#if defined(ASSERTS)
33−import Control.Exception (assert)
34−#endif
35import Control.Monad.ST (ST, runST)
32import Control.Monad.ST (ST, runST)
36import Data.Bits ((.&.))
33import Data.Bits ((.&.))
37import Data.Monoid (Monoid(..))
34import Data.Monoid (Monoid(..))