{-# LANGUAGE RankNTypes #-}
{-# OPTIONS_GHC -fsimpl-tick-factor=230 #-}
module Text.BlazeT.Renderer.Utf8
(
renderMarkupBuilder
, renderMarkup
, renderMarkupToByteStringIO
, renderHtmlBuilder
, renderHtml
, renderHtmlToByteStringIO
) where
import qualified Blaze.ByteString.Builder as B
import qualified Data.ByteString as BS
import qualified Data.ByteString.Lazy as BL
import qualified Text.Blaze.Renderer.Utf8 as BU
import Text.BlazeT
renderMarkupBuilder :: MarkupI a -> B.Builder
renderMarkupBuilder :: forall a. MarkupI a -> Builder
renderMarkupBuilder = Markup -> Builder
BU.renderMarkupBuilder forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall a. MarkupI a -> Markup
execMarkup
renderHtmlBuilder :: MarkupI a -> B.Builder
renderHtmlBuilder :: forall a. MarkupI a -> Builder
renderHtmlBuilder = forall a. MarkupI a -> Builder
renderMarkupBuilder
renderMarkup :: MarkupI a -> BL.ByteString
renderMarkup :: forall a. MarkupI a -> ByteString
renderMarkup = Markup -> ByteString
BU.renderMarkup forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall a. MarkupI a -> Markup
execMarkup
renderHtml :: MarkupI a -> BL.ByteString
renderHtml :: forall a. MarkupI a -> ByteString
renderHtml = forall a. MarkupI a -> ByteString
renderMarkup
renderMarkupToByteStringIO :: (BS.ByteString -> IO ()) -> MarkupI a -> IO ()
renderMarkupToByteStringIO :: forall a. (ByteString -> IO ()) -> MarkupI a -> IO ()
renderMarkupToByteStringIO ByteString -> IO ()
g = (ByteString -> IO ()) -> Markup -> IO ()
BU.renderMarkupToByteStringIO ByteString -> IO ()
g forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall a. MarkupI a -> Markup
execMarkup
renderHtmlToByteStringIO :: (BS.ByteString -> IO ()) -> MarkupI a -> IO ()
renderHtmlToByteStringIO :: forall a. (ByteString -> IO ()) -> MarkupI a -> IO ()
renderHtmlToByteStringIO = forall a. (ByteString -> IO ()) -> MarkupI a -> IO ()
renderMarkupToByteStringIO