-- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:69 -- {-# LANGUAGE OverloadedStrings #-} -- | This module exports HTML combinators used to create documents. -- module Text.Blaze.Html4.FrameSet ( module Text.Blaze , docType , docTypeHtml , a , abbr , acronym , address , applet , area , b , basefont , bdo , big , blockquote , body , br , button , caption , center , cite , code , col , colgroup , dd , del , dfn , dir , div , dl , dt , em , fieldset , font , form , frame , frameset , h1 , h2 , h3 , h4 , h5 , h6 , head , hr , html , i , iframe , img , input , ins , isindex , kbd , label , legend , li , link , map , menu , meta , noframes , noscript , object , ol , optgroup , option , p , param , pre , q , s , samp , script , select , small , span , strong , style , sub , sup , table , tbody , td , textarea , tfoot , th , thead , title , tr , tt , u , ul , var ) where -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:77 -- import Prelude ((>>), (.)) import Text.Blaze import Text.Blaze.Internal -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:155 -- -- | Combinator for the document type. This should be placed at the top -- of every HTML page. -- -- Example: -- -- > docType -- -- Result: -- -- > "http://www.w3.org/TR/html4/frameset.dtd"> -- docType :: Html -- ^ The document type HTML. docType = preEscapedText "\n" {-# INLINE docType #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:176 -- -- | Combinator for the @\@ element. This combinator will also -- insert the correct doctype. -- -- Example: -- -- > docTypeHtml $ span $ text "foo" -- -- Result: -- -- > "http://www.w3.org/TR/html4/frameset.dtd"> -- > foo -- docTypeHtml :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. docTypeHtml inner = docType >> html inner {-# INLINE docTypeHtml #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > a $ span $ text "foo" -- -- Result: -- -- > foo -- a :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. a = Parent "" {-# INLINE a #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > abbr $ span $ text "foo" -- -- Result: -- -- > foo -- abbr :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. abbr = Parent "" {-# INLINE abbr #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > acronym $ span $ text "foo" -- -- Result: -- -- > foo -- acronym :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. acronym = Parent "" {-# INLINE acronym #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > address $ span $ text "foo" -- -- Result: -- -- >
foo
-- address :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. address = Parent "" {-# INLINE address #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > applet $ span $ text "foo" -- -- Result: -- -- > foo -- applet :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. applet = Parent "" {-# INLINE applet #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:225 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > area -- -- Result: -- -- > -- area :: Html -- ^ Resulting HTML. area = Leaf "" {-# INLINE area #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > b $ span $ text "foo" -- -- Result: -- -- > foo -- b :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. b = Parent "" {-# INLINE b #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:225 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > basefont -- -- Result: -- -- > -- basefont :: Html -- ^ Resulting HTML. basefont = Leaf "" {-# INLINE basefont #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > bdo $ span $ text "foo" -- -- Result: -- -- > foo -- bdo :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. bdo = Parent "" {-# INLINE bdo #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > big $ span $ text "foo" -- -- Result: -- -- > foo -- big :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. big = Parent "" {-# INLINE big #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > blockquote $ span $ text "foo" -- -- Result: -- -- >
foo
-- blockquote :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. blockquote = Parent "" {-# INLINE blockquote #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > body $ span $ text "foo" -- -- Result: -- -- > foo -- body :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. body = Parent "" {-# INLINE body #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:225 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > br -- -- Result: -- -- >
-- br :: Html -- ^ Resulting HTML. br = Leaf "" {-# INLINE br #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\ -- button :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. button = Parent "" {-# INLINE button #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > caption $ span $ text "foo" -- -- Result: -- -- > foo -- caption :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. caption = Parent "" {-# INLINE caption #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > center $ span $ text "foo" -- -- Result: -- -- >
foo
-- center :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. center = Parent "" {-# INLINE center #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > cite $ span $ text "foo" -- -- Result: -- -- > foo -- cite :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. cite = Parent "" {-# INLINE cite #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > code $ span $ text "foo" -- -- Result: -- -- > foo -- code :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. code = Parent "" {-# INLINE code #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:225 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > col -- -- Result: -- -- > -- col :: Html -- ^ Resulting HTML. col = Leaf "" {-# INLINE col #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > colgroup $ span $ text "foo" -- -- Result: -- -- > foo -- colgroup :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. colgroup = Parent "" {-# INLINE colgroup #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > dd $ span $ text "foo" -- -- Result: -- -- >
foo
-- dd :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. dd = Parent "" {-# INLINE dd #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > del $ span $ text "foo" -- -- Result: -- -- > foo -- del :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. del = Parent "" {-# INLINE del #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > dfn $ span $ text "foo" -- -- Result: -- -- > foo -- dfn :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. dfn = Parent "" {-# INLINE dfn #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > dir $ span $ text "foo" -- -- Result: -- -- > foo -- dir :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. dir = Parent "" {-# INLINE dir #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > div $ span $ text "foo" -- -- Result: -- -- >
foo
-- div :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. div = Parent "" {-# INLINE div #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > dl $ span $ text "foo" -- -- Result: -- -- >
foo
-- dl :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. dl = Parent "" {-# INLINE dl #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > dt $ span $ text "foo" -- -- Result: -- -- >
foo
-- dt :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. dt = Parent "" {-# INLINE dt #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > em $ span $ text "foo" -- -- Result: -- -- > foo -- em :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. em = Parent "" {-# INLINE em #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > fieldset $ span $ text "foo" -- -- Result: -- -- >
foo
-- fieldset :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. fieldset = Parent "" {-# INLINE fieldset #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > font $ span $ text "foo" -- -- Result: -- -- > foo -- font :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. font = Parent "" {-# INLINE font #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > form $ span $ text "foo" -- -- Result: -- -- > foo
-- form :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. form = Parent "" {-# INLINE form #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:225 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > frame -- -- Result: -- -- > -- frame :: Html -- ^ Resulting HTML. frame = Leaf "" {-# INLINE frame #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > frameset $ span $ text "foo" -- -- Result: -- -- > foo -- frameset :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. frameset = Parent "" {-# INLINE frameset #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\

@ element. -- -- Example: -- -- > h1 $ span $ text "foo" -- -- Result: -- -- >

foo

-- h1 :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. h1 = Parent "" {-# INLINE h1 #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\

@ element. -- -- Example: -- -- > h2 $ span $ text "foo" -- -- Result: -- -- >

foo

-- h2 :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. h2 = Parent "" {-# INLINE h2 #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\

@ element. -- -- Example: -- -- > h3 $ span $ text "foo" -- -- Result: -- -- >

foo

-- h3 :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. h3 = Parent "" {-# INLINE h3 #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\

@ element. -- -- Example: -- -- > h4 $ span $ text "foo" -- -- Result: -- -- >

foo

-- h4 :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. h4 = Parent "" {-# INLINE h4 #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > h5 $ span $ text "foo" -- -- Result: -- -- >
foo
-- h5 :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. h5 = Parent "" {-# INLINE h5 #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > h6 $ span $ text "foo" -- -- Result: -- -- >
foo
-- h6 :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. h6 = Parent "" {-# INLINE h6 #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > head $ span $ text "foo" -- -- Result: -- -- > foo -- head :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. head = Parent "" {-# INLINE head #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:225 -- -- | Combinator for the @\
@ element. -- -- Example: -- -- > hr -- -- Result: -- -- >
-- hr :: Html -- ^ Resulting HTML. hr = Leaf "" {-# INLINE hr #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > html $ span $ text "foo" -- -- Result: -- -- > foo -- html :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. html = Parent "" {-# INLINE html #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > i $ span $ text "foo" -- -- Result: -- -- > foo -- i :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. i = Parent "" {-# INLINE i #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\ -- iframe :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. iframe = Parent "" {-# INLINE iframe #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:225 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > img -- -- Result: -- -- > -- img :: Html -- ^ Resulting HTML. img = Leaf "" {-# INLINE img #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:225 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > input -- -- Result: -- -- > -- input :: Html -- ^ Resulting HTML. input = Leaf "" {-# INLINE input #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > ins $ span $ text "foo" -- -- Result: -- -- > foo -- ins :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. ins = Parent "" {-# INLINE ins #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > isindex $ span $ text "foo" -- -- Result: -- -- > foo -- isindex :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. isindex = Parent "" {-# INLINE isindex #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\@ element. -- -- Example: -- -- > kbd $ span $ text "foo" -- -- Result: -- -- > foo -- kbd :: Html -- ^ Inner HTML. -> Html -- ^ Resulting HTML. kbd = Parent "" {-# INLINE kbd #-} -- WARNING: The next block of code was automatically generated by -- Util/GenerateHtmlCombinators.hs:198 -- -- | Combinator for the @\