1 {-# LANGUAGE OverloadedStrings #-}
2 {-# LANGUAGE NoMonomorphismRestriction #-}
3 {-# LANGUAGE RankNTypes #-}
6 import Text.Blaze.Html5.Attributes
9 import Text.BlazeT.Html5 hiding (main)
10 import Text.BlazeT.Renderer.Utf8
13 import Text.Blaze.Html5 hiding (main)
14 import Text.Blaze.Renderer.Utf8
18 main = print $ renderMarkup $ do
20 -- "some text" -- does not work
21 html $ do text "some text" -- does not work
23 ("wow" :: Markup) -- overloaded strings
24 text "asd" ! href "asd"
25 string "string" ! href "asd"
26 toMarkup ("more text" :: String)