aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/Text/BlazeT/Internal.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/BlazeT/Internal.hs')
-rw-r--r--src/Text/BlazeT/Internal.hs26
1 files changed, 21 insertions, 5 deletions
diff --git a/src/Text/BlazeT/Internal.hs b/src/Text/BlazeT/Internal.hs
index fcdf944..f6f642a 100644
--- a/src/Text/BlazeT/Internal.hs
+++ b/src/Text/BlazeT/Internal.hs
@@ -63,11 +63,11 @@ module Text.BlazeT.Internal
63 , unsafeLazyByteString 63 , unsafeLazyByteString
64 64
65 -- ** Comments 65 -- ** Comments
66 , Text.Blaze.textComment 66 , textComment
67 , Text.Blaze.lazyTextComment 67 , lazyTextComment
68 , Text.Blaze.stringComment 68 , stringComment
69 , Text.Blaze.unsafeByteStringComment 69 , unsafeByteStringComment
70 , Text.Blaze.unsafeLazyByteStringComment 70 , unsafeLazyByteStringComment
71 71
72 -- ** Converting values to tags. 72 -- ** Converting values to tags.
73 , Text.Blaze.textTag 73 , Text.Blaze.textTag
@@ -273,6 +273,22 @@ lazyText :: LT.Text -> Markup
273lazyText = wrapMarkup . Text.Blaze.lazyText 273lazyText = wrapMarkup . Text.Blaze.lazyText
274{-# INLINE lazyText #-} 274{-# INLINE lazyText #-}
275 275
276
277textComment :: T.Text -> Markup
278textComment = wrapMarkup . Text.Blaze.textComment
279
280lazyTextComment :: LT.Text -> Markup
281lazyTextComment = wrapMarkup . Text.Blaze.lazyTextComment
282
283stringComment :: String -> Markup
284stringComment = wrapMarkup . Text.Blaze.stringComment
285
286unsafeByteStringComment :: BS.ByteString -> Markup
287unsafeByteStringComment = wrapMarkup . Text.Blaze.unsafeByteStringComment
288
289unsafeLazyByteStringComment :: BL.ByteString -> Markup
290unsafeLazyByteStringComment = wrapMarkup . Text.Blaze.unsafeLazyByteStringComment
291
276-- $descr1 292-- $descr1
277-- The following is an adaptation of all "Text.Blaze.Internal" exports to 293-- The following is an adaptation of all "Text.Blaze.Internal" exports to
278-- @blazeT@ types. 294-- @blazeT@ types.