mirror of
https://github.com/jgm/pandoc.git
synced 2026-09-01 15:38:09 +08:00
John MacFarlane
634 lines
18 KiB
Plaintext
634 lines
18 KiB
Plaintext
Pandoc
|
|
Meta { unMeta = fromList [] }
|
|
[ Para
|
|
[ Str
|
|
"This is a set of tests for pandoc Textile Reader. Part of it comes"
|
|
, LineBreak
|
|
, Str "from John Gruber\8217s markdown test suite."
|
|
]
|
|
, HorizontalRule
|
|
, Header 1 ( "headers" , [] , [] ) [ Str "Headers" ]
|
|
, Header
|
|
2
|
|
( "level-2-with-an-embedded-link" , [] , [] )
|
|
[ Str "Level 2 with an "
|
|
, Link
|
|
( "" , [] , [] )
|
|
[ Str "embedded link" ]
|
|
( "http://www.example.com" , "" )
|
|
]
|
|
, Header
|
|
3
|
|
( "level-3-with-emphasis" , [] , [] )
|
|
[ Str "Level 3 with " , Strong [ Str "emphasis" ] ]
|
|
, Header 4 ( "level-4" , [] , [] ) [ Str "Level 4" ]
|
|
, Header 5 ( "level-5" , [] , [] ) [ Str "Level 5" ]
|
|
, Header 6 ( "level-6" , [] , [] ) [ Str "Level 6" ]
|
|
, Header 1 ( "paragraphs" , [] , [] ) [ Str "Paragraphs" ]
|
|
, Para [ Str "Here\8217s a regular paragraph." ]
|
|
, Para
|
|
[ Str
|
|
"Line breaks are preserved in textile, so you can not wrap your very"
|
|
, LineBreak
|
|
, Str
|
|
"long paragraph with your favourite text editor and have it rendered"
|
|
, LineBreak
|
|
, Str "with no break."
|
|
]
|
|
, Para [ Str "Here\8217s one with a bullet." ]
|
|
, BulletList [ [ Plain [ Str "criminey." ] ] ]
|
|
, Para
|
|
[ Str "There should be a paragraph break between here" ]
|
|
, Para [ Str "and here." ]
|
|
, Para [ Str "pandoc converts textile." ]
|
|
, Header
|
|
1 ( "block-quotes" , [] , [] ) [ Str "Block Quotes" ]
|
|
, BlockQuote
|
|
[ Para
|
|
[ Str
|
|
"This is a famous quote from somebody. He had a lot of things to"
|
|
, LineBreak
|
|
, Str
|
|
"say, so the text is really really long and spans on multiple lines."
|
|
]
|
|
]
|
|
, Para [ Str "And a following paragraph." ]
|
|
, Header 1 ( "code-blocks" , [] , [] ) [ Str "Code Blocks" ]
|
|
, Para [ Str "Code:" ]
|
|
, CodeBlock
|
|
( "" , [] , [] )
|
|
" ---- (should be four hyphens)\n\n sub status {\n print \"working\";\n }\n\n this code block is indented by one tab"
|
|
, Para [ Str "And:" ]
|
|
, CodeBlock
|
|
( "" , [] , [] )
|
|
" this code block is indented by two tabs\n\n These should not be escaped: \\$ \\\\ \\> \\[ \\{"
|
|
, CodeBlock
|
|
( "" , [] , [] )
|
|
"Code block with .bc\n continued\n @</\\"
|
|
, CodeBlock
|
|
( "" , [] , [] ) "extended code block\n\n continued"
|
|
, Para [ Str "ended by paragraph" ]
|
|
, Para
|
|
[ Str "Inline code: "
|
|
, Code ( "" , [] , [] ) "<tt>"
|
|
, Str ", "
|
|
, Code ( "" , [] , [] ) "@"
|
|
, Str "."
|
|
]
|
|
, Header 1 ( "notextile" , [] , [] ) [ Str "Notextile" ]
|
|
, Para
|
|
[ Str "A block of text can be protected with notextile :" ]
|
|
, Para [ Str "\nNo *bold* and\n* no bullet\n" ]
|
|
, Para
|
|
[ Str
|
|
"and inlines can be protected with double *equals (=)* markup."
|
|
]
|
|
, Header 1 ( "lists" , [] , [] ) [ Str "Lists" ]
|
|
, Header 2 ( "unordered" , [] , [] ) [ Str "Unordered" ]
|
|
, Para [ Str "Asterisks tight:" ]
|
|
, BulletList
|
|
[ [ Plain [ Str "asterisk 1" ] ]
|
|
, [ Plain [ Str "asterisk 2" ] ]
|
|
, [ Plain [ Str "asterisk 3" ] ]
|
|
]
|
|
, Para [ Str "With line breaks:" ]
|
|
, BulletList
|
|
[ [ Plain [ Str "asterisk 1" , LineBreak , Str "newline" ] ]
|
|
, [ Plain [ Str "asterisk 2" ] ]
|
|
]
|
|
, Header 2 ( "ordered" , [] , [] ) [ Str "Ordered" ]
|
|
, Para [ Str "Tight:" ]
|
|
, OrderedList
|
|
( 1 , DefaultStyle , DefaultDelim )
|
|
[ [ Plain [ Str "First" ] ]
|
|
, [ Plain [ Str "Second" ] ]
|
|
, [ Plain [ Str "Third" ] ]
|
|
]
|
|
, Header 2 ( "nested" , [] , [] ) [ Str "Nested" ]
|
|
, BulletList
|
|
[ [ Plain [ Str "ui 1" ]
|
|
, BulletList
|
|
[ [ Plain [ Str "ui 1.1" ]
|
|
, OrderedList
|
|
( 1 , DefaultStyle , DefaultDelim )
|
|
[ [ Plain [ Str "oi 1.1.1" ] ]
|
|
, [ Plain [ Str "oi 1.1.2" ] ]
|
|
]
|
|
]
|
|
, [ Plain [ Str "ui 1.2" ] ]
|
|
]
|
|
]
|
|
, [ Plain [ Str "ui 2" ]
|
|
, OrderedList
|
|
( 1 , DefaultStyle , DefaultDelim )
|
|
[ [ Plain [ Str "oi 2.1" ]
|
|
, BulletList
|
|
[ [ Plain [ Str "ui 2.1.1" ] ]
|
|
, [ Plain [ Str "ui 2.1.2" ] ]
|
|
]
|
|
]
|
|
]
|
|
]
|
|
]
|
|
, Header 2 ( "issue-1500" , [] , [] ) [ Str "Issue #1500" ]
|
|
, BulletList
|
|
[ [ Plain [ Str "one" ] ]
|
|
, [ Plain [ Str "two" , LineBreak , Str "-> and more" ] ]
|
|
]
|
|
, Header 2 ( "issue-1513" , [] , [] ) [ Str "Issue #1513" ]
|
|
, Para [ Str "List:" ]
|
|
, BulletList
|
|
[ [ Plain [ Str "one" ] ] , [ Plain [ Str "two" ] ] ]
|
|
, Header
|
|
2 ( "definition-list" , [] , [] ) [ Str "Definition List" ]
|
|
, DefinitionList
|
|
[ ( [ Str "coffee" ]
|
|
, [ [ Plain [ Str "Hot and black" ] ] ]
|
|
)
|
|
, ( [ Str "tea" ]
|
|
, [ [ Plain [ Str "Also hot, but a little less black" ] ] ]
|
|
)
|
|
, ( [ Str "milk" ]
|
|
, [ [ Para [ Str "Nourishing beverage for baby cows." ]
|
|
, Para [ Str "Cold drink that goes great with cookies." ]
|
|
]
|
|
]
|
|
)
|
|
, ( [ Str "beer" ]
|
|
, [ [ Plain [ Str "fresh and bitter" ] ] ]
|
|
)
|
|
]
|
|
, Header
|
|
1 ( "inline-markup" , [] , [] ) [ Str "Inline Markup" ]
|
|
, Para
|
|
[ Str "This is "
|
|
, Emph [ Str "emphasized" ]
|
|
, Str ", and so "
|
|
, Emph [ Str "is this" ]
|
|
, Str "."
|
|
, LineBreak
|
|
, Str "This is "
|
|
, Strong [ Str "strong" ]
|
|
, Str ", and so "
|
|
, Strong [ Str "is this" ]
|
|
, Str "."
|
|
, LineBreak
|
|
, Str "This is "
|
|
, Underline [ Str "inserted" ]
|
|
, Str ", and this is "
|
|
, Strikeout [ Str "deleted" ]
|
|
, Str "."
|
|
, LineBreak
|
|
, Str
|
|
"Hyphenated-words-are-ok, as well as strange_underscore_notation."
|
|
, LineBreak
|
|
, Str "A "
|
|
, Link
|
|
( "" , [] , [] )
|
|
[ Strong [ Str "strong link" ] ]
|
|
( "http://www.foobar.com" , "" )
|
|
, Str "."
|
|
]
|
|
, Para
|
|
[ Emph [ Strong [ Str "This is strong and em." ] ]
|
|
, LineBreak
|
|
, Str "So is "
|
|
, Strong [ Emph [ Str "this" ] ]
|
|
, Str " word and "
|
|
, Emph [ Strong [ Str "that one" ] ]
|
|
, Str "."
|
|
, LineBreak
|
|
, Strikeout
|
|
[ Str "This is strikeout and " , Strong [ Str "strong" ] ]
|
|
]
|
|
, Para
|
|
[ Str "Superscripts: a"
|
|
, Superscript [ Str "bc" ]
|
|
, Str "d a "
|
|
, Superscript [ Strong [ Str "hello" ] ]
|
|
, Str " a"
|
|
, Superscript [ Str "hello there" ]
|
|
, Str "."
|
|
, LineBreak
|
|
, Str "Subscripts: "
|
|
, Subscript [ Str "here" ]
|
|
, Str " H "
|
|
, Subscript [ Str "2" ]
|
|
, Str "O, H "
|
|
, Subscript [ Str "23" ]
|
|
, Str "O, H "
|
|
, Subscript [ Str "many of them" ]
|
|
, Str "O."
|
|
]
|
|
, Para [ Str "Dashes : How cool \8212 automatic dashes." ]
|
|
, Para
|
|
[ Str
|
|
"Ellipses : He thought and thought \8230 and then thought some more."
|
|
]
|
|
, Para
|
|
[ Str "Quotes and apostrophes : "
|
|
, Quoted DoubleQuote [ Str "I\8217d like to thank you" ]
|
|
, Str " for example."
|
|
]
|
|
, Header 1 ( "links" , [] , [] ) [ Str "Links" ]
|
|
, Header 2 ( "explicit" , [] , [] ) [ Str "Explicit" ]
|
|
, Para
|
|
[ Str "Just a "
|
|
, Link
|
|
( "" , [] , [] ) [ Str "url" ] ( "http://www.url.com" , "" )
|
|
]
|
|
, Para
|
|
[ Link
|
|
( "" , [] , [] )
|
|
[ Str "Email link" ]
|
|
( "mailto:nobody@nowhere.net" , "" )
|
|
]
|
|
, Para
|
|
[ Quoted DoubleQuote [ Str "not a link" ] , Str ": foo" ]
|
|
, Para
|
|
[ Str "Automatic linking to "
|
|
, Link
|
|
( "" , [] , [] )
|
|
[ Str "http://www.example.com" ]
|
|
( "http://www.example.com" , "" )
|
|
, Str "."
|
|
]
|
|
, Para
|
|
[ Link
|
|
( "" , [] , [] )
|
|
[ Str "Example" ]
|
|
( "http://www.example.com/" , "" )
|
|
, Str ": Example of a link followed by a colon."
|
|
]
|
|
, Para
|
|
[ Str "A link"
|
|
, Link
|
|
( "" , [] , [] )
|
|
[ Str "with brackets" ]
|
|
( "http://www.example.com" , "" )
|
|
, Str "and no spaces."
|
|
]
|
|
, Header 1 ( "tables" , [] , [] ) [ Str "Tables" ]
|
|
, Para
|
|
[ Str "Textile allows tables with and without headers :" ]
|
|
, Header
|
|
2 ( "without-headers" , [] , [] ) [ Str "Without headers" ]
|
|
, Table
|
|
( "" , [] , [] )
|
|
(Caption Nothing [])
|
|
[ ( AlignDefault , ColWidthDefault )
|
|
, ( AlignDefault , ColWidthDefault )
|
|
, ( AlignDefault , ColWidthDefault )
|
|
]
|
|
(TableHead ( "" , [] , [] ) [])
|
|
[ TableBody
|
|
( "" , [] , [] )
|
|
(RowHeadColumns 0)
|
|
[]
|
|
[ Row
|
|
( "" , [] , [] )
|
|
[ Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "name" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "age" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "sex" ] ]
|
|
]
|
|
, Row
|
|
( "" , [] , [] )
|
|
[ Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "joan" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "24" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "f" ] ]
|
|
]
|
|
, Row
|
|
( "" , [] , [] )
|
|
[ Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "archie" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "29" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "m" ] ]
|
|
]
|
|
, Row
|
|
( "" , [] , [] )
|
|
[ Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "bella" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "45" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "f" ] ]
|
|
]
|
|
]
|
|
]
|
|
(TableFoot ( "" , [] , [] ) [])
|
|
, Para [ Str "and some text following \8230" ]
|
|
, Header
|
|
2 ( "with-headers" , [] , [] ) [ Str "With headers" ]
|
|
, Table
|
|
( "" , [] , [] )
|
|
(Caption Nothing [])
|
|
[ ( AlignDefault , ColWidthDefault )
|
|
, ( AlignDefault , ColWidthDefault )
|
|
, ( AlignDefault , ColWidthDefault )
|
|
]
|
|
(TableHead
|
|
( "" , [] , [] )
|
|
[ Row
|
|
( "" , [] , [] )
|
|
[ Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "name" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "age" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "sex" ] ]
|
|
]
|
|
])
|
|
[ TableBody
|
|
( "" , [] , [] )
|
|
(RowHeadColumns 0)
|
|
[]
|
|
[ Row
|
|
( "" , [] , [] )
|
|
[ Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "joan" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "24" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "f" ] ]
|
|
]
|
|
, Row
|
|
( "" , [] , [] )
|
|
[ Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "archie" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "29" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "m" ] ]
|
|
]
|
|
, Row
|
|
( "" , [] , [] )
|
|
[ Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "bella" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "45" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "f" ] ]
|
|
]
|
|
]
|
|
]
|
|
(TableFoot ( "" , [] , [] ) [])
|
|
, Header 1 ( "images" , [] , [] ) [ Str "Images" ]
|
|
, Para
|
|
[ Str "Textile inline image syntax, like"
|
|
, LineBreak
|
|
, Str "here "
|
|
, Image
|
|
( "" , [] , [] )
|
|
[ Str "this is the alt text" ]
|
|
( "this_is_an_image.png" , "this is the alt text" )
|
|
, LineBreak
|
|
, Str "and here "
|
|
, Image
|
|
( "" , [] , [] ) [ Str "" ] ( "this_is_an_image.png" , "" )
|
|
, Str "."
|
|
]
|
|
, Header 1 ( "attributes" , [] , [] ) [ Str "Attributes" ]
|
|
, Header
|
|
2
|
|
( "ident"
|
|
, [ "bar" , "foo" ]
|
|
, [ ( "style" , "color:red;" ) , ( "lang" , "en" ) ]
|
|
)
|
|
[ Str "HTML and CSS attributes are parsed in headers." ]
|
|
, Header
|
|
2
|
|
( "centered" , [] , [ ( "style" , "text-align:center;" ) ] )
|
|
[ Str "Centered" ]
|
|
, Header
|
|
2
|
|
( "right" , [] , [ ( "style" , "text-align:right;" ) ] )
|
|
[ Str "Right" ]
|
|
, Header
|
|
2
|
|
( "justified"
|
|
, []
|
|
, [ ( "lang" , "en" )
|
|
, ( "style" , "color:blue;text-align:justify;" )
|
|
]
|
|
)
|
|
[ Str "Justified" ]
|
|
, Para
|
|
[ Str "as well as "
|
|
, Strong
|
|
[ Span ( "" , [ "foo" ] , [] ) [ Str "inline attributes" ] ]
|
|
, Str " of "
|
|
, Span
|
|
( "" , [] , [ ( "style" , "color:red;" ) ] )
|
|
[ Str "all kind" ]
|
|
]
|
|
, Para
|
|
[ Str "and paragraph attributes, and table attributes." ]
|
|
, Table
|
|
( "" , [] , [] )
|
|
(Caption Nothing [])
|
|
[ ( AlignDefault , ColWidthDefault )
|
|
, ( AlignDefault , ColWidthDefault )
|
|
, ( AlignDefault , ColWidthDefault )
|
|
]
|
|
(TableHead ( "" , [] , [] ) [])
|
|
[ TableBody
|
|
( "" , [] , [] )
|
|
(RowHeadColumns 0)
|
|
[]
|
|
[ Row
|
|
( "" , [] , [] )
|
|
[ Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "name" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "age" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "sex" ] ]
|
|
]
|
|
, Row
|
|
( "" , [] , [] )
|
|
[ Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "joan" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "24" ] ]
|
|
, Cell
|
|
( "" , [] , [] )
|
|
AlignDefault
|
|
(RowSpan 1)
|
|
(ColSpan 1)
|
|
[ Plain [ Str "f" ] ]
|
|
]
|
|
]
|
|
]
|
|
(TableFoot ( "" , [] , [] ) [])
|
|
, Para [ Emph [ Str "(class#id) emph" ] ]
|
|
, Para [ Emph [ Str "(no class#id) emph" ] ]
|
|
, Header 1 ( "entities" , [] , [] ) [ Str "Entities" ]
|
|
, Para [ Str "*" , LineBreak , Str "&" ]
|
|
, Header 1 ( "raw-html" , [] , [] ) [ Str "Raw HTML" ]
|
|
, Para
|
|
[ Str "However, "
|
|
, RawInline (Format "html") "<strong>"
|
|
, Str " raw HTML inlines "
|
|
, RawInline (Format "html") "</strong>"
|
|
, Str " are accepted, as well as :"
|
|
]
|
|
, RawBlock (Format "html") "<div class=\"foobar\">"
|
|
, Para
|
|
[ Str "any "
|
|
, Strong [ Str "Raw HTML Block" ]
|
|
, Str " with bold"
|
|
]
|
|
, RawBlock (Format "html") "</div>"
|
|
, Para [ Str "Html blocks can" ]
|
|
, RawBlock (Format "html") "<div>"
|
|
, Para [ Str "interrupt paragraphs" ]
|
|
, RawBlock (Format "html") "</div>"
|
|
, Para [ Str "as well." ]
|
|
, Para [ Str "Can you prove that 2 < 3 ?" ]
|
|
, Header
|
|
1
|
|
( "acronyms-and-marks" , [] , [] )
|
|
[ Str "Acronyms and marks" ]
|
|
, Para [ Str "PBS (Public Broadcasting System)" ]
|
|
, Para [ Str "Hi\8482" ]
|
|
, Para [ Str "Hi \8482" ]
|
|
, Para [ Str "\174 Hi\174" ]
|
|
, Para [ Str "Hi\169\&2008 \169 2008" ]
|
|
, Header 1 ( "footnotes" , [] , [] ) [ Str "Footnotes" ]
|
|
, Para
|
|
[ Str "A note."
|
|
, Note
|
|
[ Para [ Str "The note" , LineBreak , Str "is here!" ] ]
|
|
, Str " Another note"
|
|
, Note [ Para [ Str "Other note." ] ]
|
|
, Str "."
|
|
]
|
|
, Header
|
|
1 ( "comment-blocks" , [] , [] ) [ Str "Comment blocks" ]
|
|
, Para [ Str "not a comment." ]
|
|
]
|