text-builder 0.6.1.2 → 0.6.2
raw patch · 2 files changed
+26/−1 lines, 2 files
Files
- library/Text/Builder.hs +25/−0
- text-builder.cabal +1/−1
library/Text/Builder.hs view
@@ -5,6 +5,11 @@ run, length, null,+ -- ** Output IO+ putToStdOut,+ putToStdErr,+ putLnToStdOut,+ putLnToStdErr, -- * Constructors -- ** Builder manipulators intercalate,@@ -47,6 +52,7 @@ import qualified Data.ByteString as ByteString import qualified DeferredFolds.Unfoldr as Unfoldr import qualified Data.Text as Text+import qualified Data.Text.IO as Text newtype Action =@@ -106,6 +112,25 @@ array <- B.new arraySize action array 0 B.unsafeFreeze array++-- ** Output IO+-------------------------++{-| Put builder, to stdout -}+putToStdOut :: Builder -> IO ()+putToStdOut = Text.hPutStr stdout . run++{-| Put builder, to stderr -}+putToStdErr :: Builder -> IO ()+putToStdErr = Text.hPutStr stderr . run++{-| Put builder, followed by a line, to stdout -}+putLnToStdOut :: Builder -> IO ()+putLnToStdOut = Text.hPutStrLn stdout . run++{-| Put builder, followed by a line, to stderr -}+putLnToStdErr :: Builder -> IO ()+putLnToStdErr = Text.hPutStrLn stderr . run -- * Constructors
text-builder.cabal view
@@ -1,5 +1,5 @@ name: text-builder-version: 0.6.1.2+version: 0.6.2 category: Text synopsis: An efficient strict text builder homepage: https://github.com/nikita-volkov/text-builder