From 0bdcf415e4eff83ad8e35c1d41c8a28e0bbd5da1 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Tue, 28 Sep 2021 21:17:53 -0700 Subject: Switch from pretty-simple to pretty-show for native output. Update tests. Reason: it turns out that the native output generated by pretty-simple isn't always readable by the native reader. According to https://github.com/cdepillabout/pretty-simple/issues/99 it is not a design goal of the library that the rendered values be readable using 'read'. This makes it unsuitable for our purposes. pretty-show is a bit slower and it uses 4-space indents (non-configurable), but it doesn't have this serious drawback. --- test/mediawiki-reader.native | 2613 +++++++++++++++++++++--------------------- 1 file changed, 1300 insertions(+), 1313 deletions(-) (limited to 'test/mediawiki-reader.native') diff --git a/test/mediawiki-reader.native b/test/mediawiki-reader.native index 0a1e1c29d..184809ea6 100644 --- a/test/mediawiki-reader.native +++ b/test/mediawiki-reader.native @@ -1,1444 +1,1431 @@ Pandoc - ( Meta { unMeta = fromList [] } ) - [ Header 1 - ( "header", [], [] ) - [ Str "header" ] - , Header 2 - ( "header_level_two", [], [] ) - [ Str "header", Space, Str "level", Space, Str "two" ] - , Header 3 - ( "header_level_3", [], [] ) - [ Str "header", Space, Str "level", Space, Str "3" ] - , Header 4 - ( "header_level_four", [], [] ) - [ Str "header", Space, Emph [ Str "level" ], Space, Str "four" ] - , Header 5 - ( "header_level_5", [], [] ) - [ Str "header", Space, Str "level", Space, Str "5" ] - , Header 6 - ( "header_level_6", [], [] ) - [ Str "header", Space, Str "level", Space, Str "6" ] - , Para - [ Str "=======" - , Space - , Str "not" - , Space - , Str "a" - , Space - , Str "header" - , Space - , Str "========" - ] - , Para - [ Code ( "", [], [] ) "==\160not\160a\160header\160==" ] - , Header 2 - ( "emph_and_strong", [], [] ) - [ Str "emph", Space, Str "and", Space, Str "strong" ] + Meta { unMeta = fromList [] } + [ Header 1 ( "header" , [] , [] ) [ Str "header" ] + , Header + 2 + ( "header_level_two" , [] , [] ) + [ Str "header" , Space , Str "level" , Space , Str "two" ] + , Header + 3 + ( "header_level_3" , [] , [] ) + [ Str "header" , Space , Str "level" , Space , Str "3" ] + , Header + 4 + ( "header_level_four" , [] , [] ) + [ Str "header" + , Space + , Emph [ Str "level" ] + , Space + , Str "four" + ] + , Header + 5 + ( "header_level_5" , [] , [] ) + [ Str "header" , Space , Str "level" , Space , Str "5" ] + , Header + 6 + ( "header_level_6" , [] , [] ) + [ Str "header" , Space , Str "level" , Space , Str "6" ] + , Para + [ Str "=======" + , Space + , Str "not" + , Space + , Str "a" + , Space + , Str "header" + , Space + , Str "========" + ] , Para - [ Emph [ Str "emph" ], Space, Strong [ Str "strong" ] ] + [ Code ( "" , [] , [] ) "==\160not\160a\160header\160==" ] + , Header + 2 + ( "emph_and_strong" , [] , [] ) + [ Str "emph" , Space , Str "and" , Space , Str "strong" ] , Para - [ Strong - [ Emph [ Str "strong", Space, Str "and", Space, Str "emph" ] ] - ] + [ Emph [ Str "emph" ] , Space , Strong [ Str "strong" ] ] , Para - [ Strong - [ Emph [ Str "emph", Space, Str "inside" ], Space, Str "strong" ] - ] + [ Strong + [ Emph + [ Str "strong" , Space , Str "and" , Space , Str "emph" ] + ] + ] , Para - [ Strong - [ Str "strong", Space, Str "with", Space, Emph [ Str "emph" ] ] - ] + [ Strong + [ Emph [ Str "emph" , Space , Str "inside" ] + , Space + , Str "strong" + ] + ] , Para - [ Emph [ Strong - [ Str "strong", Space, Str "inside" ] - , Space - , Str "emph" + [ Str "strong" + , Space + , Str "with" + , Space + , Emph [ Str "emph" ] + ] ] - ] - , Header 2 - ( "horizontal_rule", [], [] ) - [ Str "horizontal", Space, Str "rule" ] , Para - [ Str "top" ] + [ Emph + [ Strong [ Str "strong" , Space , Str "inside" ] + , Space + , Str "emph" + ] + ] + , Header + 2 + ( "horizontal_rule" , [] , [] ) + [ Str "horizontal" , Space , Str "rule" ] + , Para [ Str "top" ] , HorizontalRule - , Para - [ Str "bottom" ] + , Para [ Str "bottom" ] , HorizontalRule - , Header 2 - ( "nowiki", [], [] ) - [ Str "nowiki" ] + , Header 2 ( "nowiki" , [] , [] ) [ Str "nowiki" ] + , Para [ Str "''not" , Space , Str "emph''" ] + , Header 2 ( "strikeout" , [] , [] ) [ Str "strikeout" ] + , Para + [ Strikeout + [ Str "This" + , Space + , Str "is" + , Space + , Emph [ Str "struck" , Space , Str "out" ] + ] + ] + , Header 2 ( "entities" , [] , [] ) [ Str "entities" ] + , Para [ Str "hi" , Space , Str "&" , Space , Str "low" ] + , Para [ Str "hi" , Space , Str "&" , Space , Str "low" ] + , Para [ Str "G\246del" ] + , Para [ Str "\777\2730" ] + , Header 2 ( "comments" , [] , [] ) [ Str "comments" ] + , Para [ Str "inline" , Space , Str "comment" ] + , Para [ Str "between" , Space , Str "blocks" ] + , Header 2 ( "linebreaks" , [] , [] ) [ Str "linebreaks" ] + , Para [ Str "hi" , LineBreak , Str "there" ] + , Para [ Str "hi" , LineBreak , Str "there" ] + , Header + 2 + ( "indents" , [] , [] ) + [ Str ":" , Space , Str "indents" ] + , Para [ Str "hi" ] + , DefinitionList [ ( [] , [ [ Plain [ Str "there" ] ] ] ) ] + , Para [ Str "bud" ] + , Para [ Str "hi" ] + , DefinitionList + [ ( [] + , [ [ DefinitionList + [ ( [] , [ [ Plain [ Str "there" ] ] ] ) ] + ] + ] + ) + ] + , Para [ Str "bud" ] + , Header + 2 ( "p_tags" , [] , [] ) [ Str "p" , Space , Str "tags" ] + , Para [ Str "hi" , Space , Str "there" ] + , Para [ Str "bud" ] + , Para [ Str "another" ] + , Header + 2 + ( "raw_html" , [] , [] ) + [ Str "raw" , Space , Str "html" ] + , Para + [ Str "hi" + , Space + , RawInline (Format "html") "" + , Emph [ Str "there" ] + , RawInline (Format "html") "" + , Str "." + ] , Para - [ Str "''not", Space, Str "emph''" ] - , Header 2 - ( "strikeout", [], [] ) - [ Str "strikeout" ] + [ RawInline (Format "html") "" + , Str "inserted" + , RawInline (Format "html") "" + ] + , RawBlock (Format "html") "
" + , Para [ Str "hi" , Space , Emph [ Str "there" ] ] + , RawBlock (Format "html") "
" + , Header + 2 + ( "sup_sub_del" , [] , [] ) + [ Str "sup," , Space , Str "sub," , Space , Str "del" ] + , Para + [ Str "H" + , Subscript [ Str "2" ] + , Str "O" + , Space + , Str "base" + , Superscript [ Emph [ Str "exponent" ] ] + , SoftBreak + , Strikeout [ Str "hello" ] + ] + , Header + 2 + ( "inline_code" , [] , [] ) + [ Str "inline" , Space , Str "code" ] , Para - [ Strikeout - [ Str "This" + [ Code ( "" , [] , [] ) "*\8594*" , Space - , Str "is" + , Code ( "" , [] , [] ) "typed" , Space - , Emph - [ Str "struck", Space, Str "out" ] + , Code ( "" , [ "haskell" ] , [] ) ">>=" ] - ] - , Header 2 - ( "entities", [], [] ) - [ Str "entities" ] - , Para - [ Str "hi", Space, Str "&", Space, Str "low" ] - , Para - [ Str "hi", Space, Str "&", Space, Str "low" ] - , Para - [ Str "G\246del" ] - , Para - [ Str "\777\2730" ] - , Header 2 - ( "comments", [], [] ) - [ Str "comments" ] - , Para - [ Str "inline", Space, Str "comment" ] - , Para - [ Str "between", Space, Str "blocks" ] - , Header 2 - ( "linebreaks", [], [] ) - [ Str "linebreaks" ] - , Para - [ Str "hi", LineBreak, Str "there" ] - , Para - [ Str "hi", LineBreak, Str "there" ] - , Header 2 - ( "indents", [], [] ) - [ Str ":", Space, Str "indents" ] - , Para - [ Str "hi" ] - , DefinitionList - [ ( [], [ [ Plain [ Str "there" ] ] ] ) ] - , Para - [ Str "bud" ] - , Para - [ Str "hi" ] - , DefinitionList - [ - ( [] - , - [ [ DefinitionList [ ( [], [ [ Plain [ Str "there" ] ] ] ) ] ] ] - ) - ] - , Para - [ Str "bud" ] - , Header 2 - ( "p_tags", [], [] ) - [ Str "p", Space, Str "tags" ] - , Para - [ Str "hi", Space, Str "there" ] - , Para - [ Str "bud" ] - , Para - [ Str "another" ] - , Header 2 - ( "raw_html", [], [] ) - [ Str "raw", Space, Str "html" ] - , Para - [ Str "hi" - , Space - , RawInline - ( Format "html" ) "" - , Emph - [ Str "there" ] - , RawInline - ( Format "html" ) "" - , Str "." - ] - , Para - [ RawInline - ( Format "html" ) "" - , Str "inserted" - , RawInline - ( Format "html" ) "" - ] - , RawBlock - ( Format "html" ) "
" - , Para - [ Str "hi", Space, Emph [ Str "there" ] ] - , RawBlock - ( Format "html" ) "
" - , Header 2 - ( "sup_sub_del", [], [] ) - [ Str "sup,", Space, Str "sub,", Space, Str "del" ] - , Para - [ Str "H" - , Subscript - [ Str "2" ] - , Str "O" - , Space - , Str "base" - , Superscript - [ Emph [ Str "exponent" ] ] - , SoftBreak - , Strikeout - [ Str "hello" ] - ] - , Header 2 - ( "inline_code", [], [] ) - [ Str "inline", Space, Str "code" ] - , Para - [ Code - ( "", [], [] ) "*\8594*" - , Space - , Code - ( "", [], [] ) "typed" - , Space - , Code - ( "", [ "haskell" ], [] ) ">>=" - ] - , Header 2 - ( "code_blocks", [], [] ) - [ Str "code", Space, Str "blocks" ] + , Header + 2 + ( "code_blocks" , [] , [] ) + [ Str "code" , Space , Str "blocks" ] , CodeBlock - ( "" - , [] - , [] - ) "case xs of\n (_:_) -> reverse xs\n [] -> ['*']" + ( "" , [] , [] ) + "case xs of\n (_:_) -> reverse xs\n [] -> ['*']" , CodeBlock - ( "" - , [ "haskell" ] - , [] - ) "case xs of\n (_:_) -> reverse xs\n [] -> ['*']" + ( "" , [ "haskell" ] , [] ) + "case xs of\n (_:_) -> reverse xs\n [] -> ['*']" , CodeBlock - ( "" - , - [ "ruby", "numberLines" ] - , - [ ( "startFrom", "100" ) ] - ) "widgets.each do |w|\n print w.price\nend" - , Header 2 - ( "block_quotes", [], [] ) - [ Str "block", Space, Str "quotes" ] - , Para - [ Str "Regular", Space, Str "paragraph" ] + ( "" + , [ "ruby" , "numberLines" ] + , [ ( "startFrom" , "100" ) ] + ) + "widgets.each do |w|\n print w.price\nend" + , Header + 2 + ( "block_quotes" , [] , [] ) + [ Str "block" , Space , Str "quotes" ] + , Para [ Str "Regular" , Space , Str "paragraph" ] , BlockQuote - [ Para - [ Str "This" - , Space - , Str "is" - , Space - , Str "a" - , Space - , Str "block" - , Space - , Str "quote." + [ Para + [ Str "This" + , Space + , Str "is" + , Space + , Str "a" + , Space + , Str "block" + , Space + , Str "quote." + ] + , Para + [ Str "With" + , Space + , Str "two" + , Space + , Str "paragraphs." + ] + ] + , Para [ Str "Nother" , Space , Str "paragraph." ] + , Header + 2 + ( "external_links" , [] , [] ) + [ Str "external" , Space , Str "links" ] + , Para + [ Link + ( "" , [] , [] ) + [ Emph [ Str "Google" ] + , Space + , Str "search" + , Space + , Str "engine" + ] + ( "http://google.com" , "" ) ] - , Para - [ Str "With", Space, Str "two", Space, Str "paragraphs." ] - ] , Para - [ Str "Nother", Space, Str "paragraph." ] - , Header 2 - ( "external_links", [], [] ) - [ Str "external", Space, Str "links" ] + [ Link + ( "" , [] , [] ) + [ Str "http://pandoc.org" ] + ( "http://pandoc.org" , "" ) + ] , Para - [ Link - ( "", [], [] ) - [ Emph - [ Str "Google" ] - , Space - , Str "search" + [ Link + ( "" , [] , [] ) [ Str "1" ] ( "http://google.com" , "" ) , Space - , Str "engine" + , Link + ( "" , [] , [] ) [ Str "2" ] ( "http://yahoo.com" , "" ) ] - ( "http://google.com", "" ) - ] - , Para - [ Link - ( "", [], [] ) - [ Str "http://pandoc.org" ] - ( "http://pandoc.org", "" ) - ] , Para - [ Link - ( "", [], [] ) - [ Str "1" ] - ( "http://google.com", "" ) - , Space - , Link - ( "", [], [] ) - [ Str "2" ] - ( "http://yahoo.com", "" ) - ] - , Para - [ Link - ( "", [], [] ) - [ Str "email", Space, Str "me" ] - ( "mailto:info@example.org", "" ) - ] - , Header 2 - ( "internal_links", [], [] ) - [ Str "internal", Space, Str "links" ] + [ Link + ( "" , [] , [] ) + [ Str "email" , Space , Str "me" ] + ( "mailto:info@example.org" , "" ) + ] + , Header + 2 + ( "internal_links" , [] , [] ) + [ Str "internal" , Space , Str "links" ] , Para - [ Link ( "", [], [] ) [ Str "Help" ] ( "Help", "wikilink" ) ] + [ Link + ( "" , [] , [] ) [ Str "Help" ] ( "Help" , "wikilink" ) + ] , Para - [ Link - ( "", [], [] ) - [ Str "the", Space, Str "help", Space, Str "page" ] - ( "Help", "wikilink" ) - ] + [ Link + ( "" , [] , [] ) + [ Str "the" , Space , Str "help" , Space , Str "page" ] + ( "Help" , "wikilink" ) + ] , Para - [ Link ( "", [], [] ) [ Str "Helpers" ] ( "Help", "wikilink" ) ] + [ Link + ( "" , [] , [] ) [ Str "Helpers" ] ( "Help" , "wikilink" ) + ] , Para - [ Link - ( "", [], [] ) - [ Str "Help" ] - ( "Help", "wikilink" ) - , Str "ers" - ] + [ Link + ( "" , [] , [] ) [ Str "Help" ] ( "Help" , "wikilink" ) + , Str "ers" + ] , Para - [ Link - ( "", [], [] ) - [ Str "Contents" ] - ( "Help:Contents", "wikilink" ) - ] + [ Link + ( "" , [] , [] ) + [ Str "Contents" ] + ( "Help:Contents" , "wikilink" ) + ] , Para - [ Link - ( "", [], [] ) - [ Str "#My", Space, Str "anchor" ] - ( "#My_anchor", "wikilink" ) - ] + [ Link + ( "" , [] , [] ) + [ Str "#My" , Space , Str "anchor" ] + ( "#My_anchor" , "wikilink" ) + ] , Para - [ Link - ( "", [], [] ) - [ Str "and", Space, Str "text" ] - ( "Page#with_anchor", "wikilink" ) - ] - , Header 2 - ( "images", [], [] ) - [ Str "images" ] + [ Link + ( "" , [] , [] ) + [ Str "and" , Space , Str "text" ] + ( "Page#with_anchor" , "wikilink" ) + ] + , Header 2 ( "images" , [] , [] ) [ Str "images" ] , Para - [ Image - ( "", [], [] ) - [ Str "caption" ] - ( "example.jpg", "fig:caption" ) - ] + [ Image + ( "" , [] , [] ) + [ Str "caption" ] + ( "example.jpg" , "fig:caption" ) + ] , Para - [ Image - ( "", [], [] ) - [ Str "the" - , Space - , Emph - [ Str "caption" ] - , Space - , Str "with" - , Space - , Link - ( "", [], [] ) - [ Str "external", Space, Str "link" ] - ( "http://google.com", "" ) + [ Image + ( "" , [] , [] ) + [ Str "the" + , Space + , Emph [ Str "caption" ] + , Space + , Str "with" + , Space + , Link + ( "" , [] , [] ) + [ Str "external" , Space , Str "link" ] + ( "http://google.com" , "" ) + ] + ( "example.jpg" , "fig:the caption with external link" ) ] - ( "example.jpg", "fig:the caption with external link" ) - ] , Para - [ Image - ( "", [], [ ( "width", "30" ), ( "height", "40" ) ] ) - [ Str "caption" ] - ( "example.jpg", "fig:caption" ) - ] + [ Image + ( "" , [] , [ ( "width" , "30" ) , ( "height" , "40" ) ] ) + [ Str "caption" ] + ( "example.jpg" , "fig:caption" ) + ] , Para - [ Image - ( "", [], [ ( "width", "30" ) ] ) - [ Str "caption" ] - ( "example.jpg", "fig:caption" ) - ] + [ Image + ( "" , [] , [ ( "width" , "30" ) ] ) + [ Str "caption" ] + ( "example.jpg" , "fig:caption" ) + ] , Para - [ Image - ( "", [], [ ( "width", "30" ) ] ) - [ Str "caption" ] - ( "example.jpg", "fig:caption" ) - ] + [ Image + ( "" , [] , [ ( "width" , "30" ) ] ) + [ Str "caption" ] + ( "example.jpg" , "fig:caption" ) + ] , Para - [ Image - ( "", [], [] ) - [ Str "example.jpg" ] - ( "example.jpg", "fig:example.jpg" ) - ] + [ Image + ( "" , [] , [] ) + [ Str "example.jpg" ] + ( "example.jpg" , "fig:example.jpg" ) + ] , Para - [ Image - ( "", [], [] ) - [ Str "example_es.jpg" ] - ( "example_es.jpg", "fig:example_es.jpg" ) - ] - , Header 2 - ( "lists", [], [] ) - [ Str "lists" ] + [ Image + ( "" , [] , [] ) + [ Str "example_es.jpg" ] + ( "example_es.jpg" , "fig:example_es.jpg" ) + ] + , Header 2 ( "lists" , [] , [] ) [ Str "lists" ] , BulletList - [ - [ Plain [ Str "Start", Space, Str "each", Space, Str "line" ] ] - , - [ Plain - [ Str "with" - , Space - , Str "an" - , Space - , Str "asterisk" - , Space - , Str "(*)." + [ [ Plain + [ Str "Start" , Space , Str "each" , Space , Str "line" ] ] - , BulletList - [ - [ Plain - [ Str "More" + , [ Plain + [ Str "with" , Space - , Str "asterisks" + , Str "an" , Space - , Str "gives" + , Str "asterisk" , Space - , Str "deeper" + , Str "(*)." ] - , BulletList - [ - [ Plain - [ Str "and", Space, Str "deeper", Space, Str "levels." ] + , BulletList + [ [ Plain + [ Str "More" + , Space + , Str "asterisks" + , Space + , Str "gives" + , Space + , Str "deeper" + ] + , BulletList + [ [ Plain + [ Str "and" + , Space + , Str "deeper" + , Space + , Str "levels." + ] + ] + ] ] ] - ] - ] - ] - , - [ Plain - [ Str "Line" - , Space - , Str "breaks" - , LineBreak - , Str "don't" - , Space - , Str "break" - , Space - , Str "levels." ] - , BulletList - [ - [ BulletList - [ - [ Plain - [ Str "But" - , Space - , Str "jumping" - , Space - , Str "levels" - , Space - , Str "creates" - , Space - , Str "empty" - , Space - , Str "space." - ] + , [ Plain + [ Str "Line" + , Space + , Str "breaks" + , LineBreak + , Str "don't" + , Space + , Str "break" + , Space + , Str "levels." + ] + , BulletList + [ [ BulletList + [ [ Plain + [ Str "But" + , Space + , Str "jumping" + , Space + , Str "levels" + , Space + , Str "creates" + , Space + , Str "empty" + , Space + , Str "space." + ] + ] + ] ] ] - ] ] ] - ] , Para - [ Str "Any" - , Space - , Str "other" - , Space - , Str "start" - , Space - , Str "ends" - , Space - , Str "the" - , Space - , Str "list." - ] + [ Str "Any" + , Space + , Str "other" + , Space + , Str "start" + , Space + , Str "ends" + , Space + , Str "the" + , Space + , Str "list." + ] , BulletList - [ - [ BulletList [ [ Plain [ Str "two" ] ] ] ] - , - [ Plain [ Str "one" ] ] - ] + [ [ BulletList [ [ Plain [ Str "two" ] ] ] ] + , [ Plain [ Str "one" ] ] + ] , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ Plain [ Str "Start", Space, Str "each", Space, Str "line" ] ] - , - [ Plain - [ Str "with" - , Space - , Str "a" - , Space - , Str "number" - , Space - , Str "sign" - , Space - , Str "(#)." + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain + [ Str "Start" , Space , Str "each" , Space , Str "line" ] ] - , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ Plain - [ Str "More" + , [ Plain + [ Str "with" , Space - , Str "number" + , Str "a" , Space - , Str "signs" + , Str "number" , Space - , Str "gives" + , Str "sign" , Space - , Str "deeper" + , Str "(#)." ] - , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ Plain [ Str "and", Space, Str "deeper" ] ] - , - [ Plain [ Str "levels." ] ] + , OrderedList + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain + [ Str "More" + , Space + , Str "number" + , Space + , Str "signs" + , Space + , Str "gives" + , Space + , Str "deeper" + ] + , OrderedList + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain [ Str "and" , Space , Str "deeper" ] ] + , [ Plain [ Str "levels." ] ] + ] + ] ] - ] ] - ] - , - [ Plain - [ Str "Line" - , Space - , Str "breaks" - , LineBreak - , Str "don't" - , Space - , Str "break" - , Space - , Str "levels." - ] - , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ Plain - [ Str "But" - , Space - , Str "jumping" - , Space - , Str "levels" - , Space - , Str "creates" - , Space - , Str "empty" - , Space - , Str "space." - ] + , [ Plain + [ Str "Line" + , Space + , Str "breaks" + , LineBreak + , Str "don't" + , Space + , Str "break" + , Space + , Str "levels." + ] + , OrderedList + ( 1 , DefaultStyle , DefaultDelim ) + [ [ OrderedList + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain + [ Str "But" + , Space + , Str "jumping" + , Space + , Str "levels" + , Space + , Str "creates" + , Space + , Str "empty" + , Space + , Str "space." + ] + ] + ] ] ] - ] ] + , [ Plain [ Str "Blank" , Space , Str "lines" ] ] ] - , - [ Plain [ Str "Blank", Space, Str "lines" ] ] - ] , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ Plain - [ Str "end" - , Space - , Str "the" - , Space - , Str "list" - , Space - , Str "and" - , Space - , Str "start" - , Space - , Str "another." + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain + [ Str "end" + , Space + , Str "the" + , Space + , Str "list" + , Space + , Str "and" + , Space + , Str "start" + , Space + , Str "another." + ] ] ] - ] , Para - [ Str "Any" - , Space - , Str "other" - , Space - , Str "start" - , Space - , Str "also" - , SoftBreak - , Str "ends" - , Space - , Str "the" - , Space - , Str "list." - ] + [ Str "Any" + , Space + , Str "other" + , Space + , Str "start" + , Space + , Str "also" + , SoftBreak + , Str "ends" + , Space + , Str "the" + , Space + , Str "list." + ] , DefinitionList - [ - ( - [ Str "item", Space, Str "1" ] - , - [ [ Plain [ Str "definition", Space, Str "1" ] ] ] - ) - , - ( - [ Str "item", Space, Str "2" ] - , - [ - [ Plain [ Str "definition", Space, Str "2-1" ] ] - , - [ Plain [ Str "definition", Space, Str "2-2" ] ] - ] - ) - ] - , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ Plain [ Str "one" ] ] - , - [ Plain - [ Str "two" ] - , BulletList - [ - [ Plain [ Str "two", Space, Str "point", Space, Str "one" ] ] - , - [ Plain [ Str "two", Space, Str "point", Space, Str "two" ] ] - ] + [ ( [ Str "item" , Space , Str "1" ] + , [ [ Plain [ Str "definition" , Space , Str "1" ] ] ] + ) + , ( [ Str "item" , Space , Str "2" ] + , [ [ Plain [ Str "definition" , Space , Str "2-1" ] ] + , [ Plain [ Str "definition" , Space , Str "2-2" ] ] + ] + ) ] - , - [ Plain - [ Str "three" ] - , DefinitionList - [ - ( - [ Str "three", Space, Str "item", Space, Str "one" ] - , - [ - [ Plain - [ Str "three", Space, Str "def", Space, Str "one" ] + , OrderedList + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain [ Str "one" ] ] + , [ Plain [ Str "two" ] + , BulletList + [ [ Plain + [ Str "two" + , Space + , Str "point" + , Space + , Str "one" + ] + ] + , [ Plain + [ Str "two" + , Space + , Str "point" + , Space + , Str "two" + ] ] ] - ) ] - ] - , - [ Plain - [ Str "four" ] - , DefinitionList - [ - ( [] - , - [ - [ Plain - [ Str "four", Space, Str "def", Space, Str "one" ] - ] - , - [ Plain - [ Str "this" - , Space - , Str "looks" - , Space - , Str "like" - , Space - , Str "a" - , Space - , Str "continuation" - ] - ] - , - [ Plain - [ Str "and" - , Space - , Str "is" - , Space - , Str "often" - , Space - , Str "used" + , [ Plain [ Str "three" ] + , DefinitionList + [ ( [ Str "three" , Space , Str "item" , Space , Str "one" ] + , [ [ Plain + [ Str "three" + , Space + , Str "def" + , Space + , Str "one" + ] + ] ] - ] - , - [ Plain - [ Str "instead" - , LineBreak - , Str "of" - , Space - , Str "
" - ] - ] + ) ] - ) - ] - ] - , - [ Plain - [ RawInline - ( Format "mediawiki" ) "{{{template\n|author=John\n|title=My Book\n}}}" ] - , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ Plain - [ Str "five", Space, Str "sub", Space, Str "1" ] - , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ Plain - [ Str "five" - , Space - , Str "sub" - , Space - , Str "1" - , Space - , Str "sub" - , Space - , Str "1" + , [ Plain [ Str "four" ] + , DefinitionList + [ ( [] + , [ [ Plain + [ Str "four" + , Space + , Str "def" + , Space + , Str "one" + ] + ] + , [ Plain + [ Str "this" + , Space + , Str "looks" + , Space + , Str "like" + , Space + , Str "a" + , Space + , Str "continuation" + ] + ] + , [ Plain + [ Str "and" + , Space + , Str "is" + , Space + , Str "often" + , Space + , Str "used" + ] + ] + , [ Plain + [ Str "instead" + , LineBreak + , Str "of" + , Space + , Str "
" + ] + ] ] + ) + ] + ] + , [ Plain + [ RawInline + (Format "mediawiki") + "{{{template\n|author=John\n|title=My Book\n}}}" + ] + , OrderedList + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain + [ Str "five" , Space , Str "sub" , Space , Str "1" ] + , OrderedList + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain + [ Str "five" + , Space + , Str "sub" + , Space + , Str "1" + , Space + , Str "sub" + , Space + , Str "1" + ] + ] + ] + ] + , [ Plain + [ Str "five" , Space , Str "sub" , Space , Str "2" ] ] ] - ] - , - [ Plain [ Str "five", Space, Str "sub", Space, Str "2" ] ] ] ] - ] , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ Plain - [ Str "list", Space, Str "item", Space, Emph [ Str "emph" ] ] - , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ Plain [ Str "list", Space, Str "item", Space, Str "B1" ] ] - , - [ Plain [ Str "list", Space, Str "item", Space, Str "B2" ] ] + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain + [ Str "list" + , Space + , Str "item" + , Space + , Emph [ Str "emph" ] + ] + , OrderedList + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain + [ Str "list" , Space , Str "item" , Space , Str "B1" ] + ] + , [ Plain + [ Str "list" , Space , Str "item" , Space , Str "B2" ] + ] + ] + , Para + [ Str "continuing" + , Space + , Str "list" + , Space + , Str "item" + , Space + , Str "A1" + ] ] - , Para - [ Str "continuing" - , Space - , Str "list" - , Space - , Str "item" - , Space - , Str "A1" + , [ Plain + [ Str "list" , Space , Str "item" , Space , Str "A2" ] ] ] - , - [ Plain [ Str "list", Space, Str "item", Space, Str "A2" ] ] - ] , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ - [ Plain [ Str "abc" ] ] - , - [ Plain [ Str "def" ] ] - , - [ Plain [ Str "ghi" ] ] - ] + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain [ Str "abc" ] ] + , [ Plain [ Str "def" ] ] + , [ Plain [ Str "ghi" ] ] + ] , OrderedList - ( 9, DefaultStyle, DefaultDelim ) - [ - [ Plain [ Str "Amsterdam" ] ] - , - [ Plain [ Str "Rotterdam" ] ] - , - [ Plain [ Str "The", Space, Str "Hague" ] ] - ] - , Header 2 - ( "math", [], [] ) - [ Str "math" ] - , Para - [ Str "Here" - , Space - , Str "is" - , Space - , Str "some" - , Space - , Math InlineMath "x=\\frac{y^\\pi}{z}" - , Str "." - ] - , Para - [ Str "With" - , Space - , Str "spaces:" - , Space - , Math InlineMath "x=\\frac{y^\\pi}{z}" - , Str "." - ] - , Header 2 - ( "preformatted_blocks", [], [] ) - [ Str "preformatted", Space, Str "blocks" ] - , Para - [ Code - ( "", [], [] ) "Start\160each\160line\160with\160a\160space." - , LineBreak - , Code - ( "", [], [] ) "Text\160is\160" - , Strong - [ Code ( "", [], [] ) "preformatted" ] - , Code - ( "", [], [] ) "\160and" - , LineBreak - , Emph - [ Code ( "", [], [] ) "markups" ] - , Code - ( "", [], [] ) "\160" - , Strong - [ Emph [ Code ( "", [], [] ) "can" ] ] - , Code - ( "", [], [] ) "\160be\160done." - ] - , Para - [ Code ( "", [], [] ) "\160hell\160\160\160\160\160\160yeah" ] - , Para - [ Code - ( "" - , [] - , [] - ) "Start\160with\160a\160space\160in\160the\160first\160column," - , LineBreak - , Code - ( "", [], [] ) "(before\160the\160)." - , LineBreak - , Code - ( "", [], [] ) "" - , LineBreak - , Code - ( "", [], [] ) "Then\160your\160block\160format\160will\160be" - , LineBreak - , Code - ( "", [], [] ) "\160\160\160\160maintained." - , LineBreak - , Code - ( "", [], [] ) "" - , LineBreak - , Code - ( "" - , [] - , [] - ) "This\160is\160good\160for\160copying\160in\160code\160blocks:" - , LineBreak - , Code - ( "", [], [] ) "" - , LineBreak - , Code - ( "", [], [] ) "def\160function():" - , LineBreak - , Code - ( "" - , [] - , [] - ) "\160\160\160\160\"\"\"documentation\160string\"\"\"" - , LineBreak - , Code - ( "", [], [] ) "" - , LineBreak - , Code - ( "", [], [] ) "\160\160\160\160if\160True:" - , LineBreak - , Code - ( "", [], [] ) "\160\160\160\160\160\160\160\160print\160True" - , LineBreak - , Code - ( "", [], [] ) "\160\160\160\160else:" - , LineBreak - , Code - ( "", [], [] ) "\160\160\160\160\160\160\160\160print\160False" - ] + ( 9 , DefaultStyle , DefaultDelim ) + [ [ Plain [ Str "Amsterdam" ] ] + , [ Plain [ Str "Rotterdam" ] ] + , [ Plain [ Str "The" , Space , Str "Hague" ] ] + ] + , Header 2 ( "math" , [] , [] ) [ Str "math" ] , Para - [ Str "Not" ] - , RawBlock - ( Format "html" ) "
" + [ Str "Here" + , Space + , Str "is" + , Space + , Str "some" + , Space + , Math InlineMath "x=\\frac{y^\\pi}{z}" + , Str "." + ] , Para - [ Str "preformatted" ] + [ Str "With" + , Space + , Str "spaces:" + , Space + , Math InlineMath "x=\\frac{y^\\pi}{z}" + , Str "." + ] + , Header + 2 + ( "preformatted_blocks" , [] , [] ) + [ Str "preformatted" , Space , Str "blocks" ] + , Para + [ Code + ( "" , [] , [] ) + "Start\160each\160line\160with\160a\160space." + , LineBreak + , Code ( "" , [] , [] ) "Text\160is\160" + , Strong [ Code ( "" , [] , [] ) "preformatted" ] + , Code ( "" , [] , [] ) "\160and" + , LineBreak + , Emph [ Code ( "" , [] , [] ) "markups" ] + , Code ( "" , [] , [] ) "\160" + , Strong [ Emph [ Code ( "" , [] , [] ) "can" ] ] + , Code ( "" , [] , [] ) "\160be\160done." + ] , Para - [ Str "Don't", Space, Str "need" ] + [ Code + ( "" , [] , [] ) "\160hell\160\160\160\160\160\160yeah" + ] , Para - [ Code ( "", [], [] ) "a\160blank\160line" ] + [ Code + ( "" , [] , [] ) + "Start\160with\160a\160space\160in\160the\160first\160column," + , LineBreak + , Code ( "" , [] , [] ) "(before\160the\160)." + , LineBreak + , Code ( "" , [] , [] ) "" + , LineBreak + , Code + ( "" , [] , [] ) + "Then\160your\160block\160format\160will\160be" + , LineBreak + , Code ( "" , [] , [] ) "\160\160\160\160maintained." + , LineBreak + , Code ( "" , [] , [] ) "" + , LineBreak + , Code + ( "" , [] , [] ) + "This\160is\160good\160for\160copying\160in\160code\160blocks:" + , LineBreak + , Code ( "" , [] , [] ) "" + , LineBreak + , Code ( "" , [] , [] ) "def\160function():" + , LineBreak + , Code + ( "" , [] , [] ) + "\160\160\160\160\"\"\"documentation\160string\"\"\"" + , LineBreak + , Code ( "" , [] , [] ) "" + , LineBreak + , Code ( "" , [] , [] ) "\160\160\160\160if\160True:" + , LineBreak + , Code + ( "" , [] , [] ) + "\160\160\160\160\160\160\160\160print\160True" + , LineBreak + , Code ( "" , [] , [] ) "\160\160\160\160else:" + , LineBreak + , Code + ( "" , [] , [] ) + "\160\160\160\160\160\160\160\160print\160False" + ] + , Para [ Str "Not" ] + , RawBlock (Format "html") "
" + , Para [ Str "preformatted" ] + , Para [ Str "Don't" , Space , Str "need" ] + , Para [ Code ( "" , [] , [] ) "a\160blank\160line" ] , Para - [ Str "around" - , Space - , Str "a" - , Space - , Str "preformatted" - , Space - , Str "block." - ] - , Header 2 - ( "templates", [], [] ) - [ Str "templates" ] - , RawBlock - ( Format "mediawiki" ) "{{Welcome}}" - , RawBlock - ( Format "mediawiki" ) "{{Foo:Bar}}" + [ Str "around" + , Space + , Str "a" + , Space + , Str "preformatted" + , Space + , Str "block." + ] + , Header 2 ( "templates" , [] , [] ) [ Str "templates" ] + , RawBlock (Format "mediawiki") "{{Welcome}}" + , RawBlock (Format "mediawiki") "{{Foo:Bar}}" , RawBlock - ( Format "mediawiki" ) "{{Thankyou|all your effort|Me}}" + (Format "mediawiki") "{{Thankyou|all your effort|Me}}" , Para - [ Str "Written" - , Space - , RawInline - ( Format "mediawiki" ) "{{{date}}}" - , Space - , Str "by" - , Space - , RawInline - ( Format "mediawiki" ) "{{{name}}}" - , Str "." - ] - , Header 2 - ( "tables", [], [] ) - [ Str "tables" ] + [ Str "Written" + , Space + , RawInline (Format "mediawiki") "{{{date}}}" + , Space + , Str "by" + , Space + , RawInline (Format "mediawiki") "{{{name}}}" + , Str "." + ] + , Header 2 ( "tables" , [] , [] ) [ Str "tables" ] , Table - ( "", [], [] ) - ( Caption Nothing [] ) - [ - ( AlignDefault, ColWidthDefault ) - , - ( AlignDefault, ColWidthDefault ) - ] - ( TableHead - ( "", [], [] ) - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) [] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) [] - ] + ( "" , [] , [] ) + (Caption Nothing []) + [ ( AlignDefault , ColWidthDefault ) + , ( AlignDefault , ColWidthDefault ) ] - ) - [ TableBody - ( "", [], [] ) - ( RowHeadColumns 0 ) [] - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Orange" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Apple" ] ] - ] - , Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Bread" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Pie" ] ] - ] - , Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Butter" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Ice", Space, Str "cream" ] ] - ] + (TableHead + ( "" , [] , [] ) + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [] + ] + ]) + [ TableBody + ( "" , [] , [] ) + (RowHeadColumns 0) + [] + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Orange" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Apple" ] ] + ] + , Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Bread" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Pie" ] ] + ] + , Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Butter" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Ice" , Space , Str "cream" ] ] + ] + ] ] - ] - ( TableFoot ( "", [], [] ) [] ) + (TableFoot ( "" , [] , [] ) []) , Table - ( "", [], [] ) - ( Caption Nothing - [ Plain [ Str "Food", Space, Str "complements" ] ] - ) - [ - ( AlignDefault, ColWidthDefault ) - , - ( AlignDefault, ColWidthDefault ) - ] - ( TableHead - ( "", [], [] ) - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Orange" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Apple" ] ] - ] + ( "" , [] , [] ) + (Caption + Nothing + [ Plain [ Str "Food" , Space , Str "complements" ] ]) + [ ( AlignDefault , ColWidthDefault ) + , ( AlignDefault , ColWidthDefault ) ] - ) - [ TableBody - ( "", [], [] ) - ( RowHeadColumns 0 ) [] - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Bread" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Pie" ] ] - ] - , Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Butter" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Ice", Space, Str "cream" ] ] - ] + (TableHead + ( "" , [] , [] ) + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Orange" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Apple" ] ] + ] + ]) + [ TableBody + ( "" , [] , [] ) + (RowHeadColumns 0) + [] + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Bread" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Pie" ] ] + ] + , Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Butter" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Ice" , Space , Str "cream" ] ] + ] + ] ] - ] - ( TableFoot ( "", [], [] ) [] ) + (TableFoot ( "" , [] , [] ) []) , Table - ( "", [], [] ) - ( Caption Nothing - [ Plain [ Str "Food", Space, Str "complements" ] ] - ) - [ - ( AlignDefault, ColWidthDefault ) - , - ( AlignDefault, ColWidthDefault ) - ] - ( TableHead - ( "", [], [] ) - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Orange" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Apple" ] ] - ] + ( "" , [] , [] ) + (Caption + Nothing + [ Plain [ Str "Food" , Space , Str "complements" ] ]) + [ ( AlignDefault , ColWidthDefault ) + , ( AlignDefault , ColWidthDefault ) ] - ) - [ TableBody - ( "", [], [] ) - ( RowHeadColumns 0 ) [] - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para - [ Str "Bread" ] - , Para - [ Str "and", Space, Str "cheese" ] - ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para - [ Str "Pie" ] - , OrderedList - ( 1, DefaultStyle, DefaultDelim ) - [ [ Plain [ Str "apple" ] ], [ Plain [ Str "carrot" ] ] ] + (TableHead + ( "" , [] , [] ) + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Orange" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Apple" ] ] + ] + ]) + [ TableBody + ( "" , [] , [] ) + (RowHeadColumns 0) + [] + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Bread" ] + , Para [ Str "and" , Space , Str "cheese" ] + ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Pie" ] + , OrderedList + ( 1 , DefaultStyle , DefaultDelim ) + [ [ Plain [ Str "apple" ] ] + , [ Plain [ Str "carrot" ] ] + ] + ] + ] ] - ] ] - ] - ( TableFoot ( "", [], [] ) [] ) + (TableFoot ( "" , [] , [] ) []) , Table - ( "", [], [] ) - ( Caption Nothing [] ) - [ - ( AlignDefault, ColWidthDefault ) - , - ( AlignDefault, ColWidthDefault ) - , - ( AlignDefault, ColWidthDefault ) - ] - ( TableHead - ( "", [], [] ) - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) [] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) [] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) [] - ] + ( "" , [] , [] ) + (Caption Nothing []) + [ ( AlignDefault , ColWidthDefault ) + , ( AlignDefault , ColWidthDefault ) + , ( AlignDefault , ColWidthDefault ) ] - ) - [ TableBody - ( "", [], [] ) - ( RowHeadColumns 0 ) [] - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Orange" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Apple" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "more" ] ] - ] - , Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Bread" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Pie" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "more" ] ] - ] - , Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Butter" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Ice", Space, Str "cream" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "and", Space, Str "more" ] ] - ] + (TableHead + ( "" , [] , [] ) + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [] + ] + ]) + [ TableBody + ( "" , [] , [] ) + (RowHeadColumns 0) + [] + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Orange" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Apple" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "more" ] ] + ] + , Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Bread" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Pie" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "more" ] ] + ] + , Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Butter" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Ice" , Space , Str "cream" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "and" , Space , Str "more" ] ] + ] + ] ] - ] - ( TableFoot ( "", [], [] ) [] ) + (TableFoot ( "" , [] , [] ) []) , Table - ( "", [], [] ) - ( Caption Nothing [] ) - [ - ( AlignLeft, ColWidth 0.25 ) - , - ( AlignRight, ColWidth 0.125 ) - , - ( AlignCenter, ColWidth 0.125 ) - ] - ( TableHead - ( "", [], [] ) - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Left" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Right" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Center" ] ] - ] + ( "" , [] , [] ) + (Caption Nothing []) + [ ( AlignLeft , ColWidth 0.25 ) + , ( AlignRight , ColWidth 0.125 ) + , ( AlignCenter , ColWidth 0.125 ) ] - ) - [ TableBody - ( "", [], [] ) - ( RowHeadColumns 0 ) [] - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "left" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "15.00" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "centered" ] ] - ] - , Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "more" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "2.0" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "more" ] ] - ] + (TableHead + ( "" , [] , [] ) + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Left" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Right" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Center" ] ] + ] + ]) + [ TableBody + ( "" , [] , [] ) + (RowHeadColumns 0) + [] + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "left" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "15.00" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "centered" ] ] + ] + , Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "more" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "2.0" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "more" ] ] + ] + ] ] - ] - ( TableFoot ( "", [], [] ) [] ) + (TableFoot ( "" , [] , [] ) []) , Table - ( "", [], [] ) - ( Caption Nothing [] ) - [ - ( AlignDefault, ColWidthDefault ) - , - ( AlignDefault, ColWidthDefault ) - ] - ( TableHead - ( "", [], [] ) - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) [] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) [] - ] + ( "" , [] , [] ) + (Caption Nothing []) + [ ( AlignDefault , ColWidthDefault ) + , ( AlignDefault , ColWidthDefault ) ] - ) - [ TableBody - ( "", [], [] ) - ( RowHeadColumns 0 ) [] - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Orange" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Apple" ] ] - ] - , Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Bread" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Table - ( "", [], [] ) - ( Caption Nothing [] ) - [ - ( AlignDefault, ColWidthDefault ) - , - ( AlignDefault, ColWidthDefault ) - ] - ( TableHead - ( "", [], [] ) - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "fruit" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "topping" ] ] - ] + (TableHead + ( "" , [] , [] ) + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [] + ] + ]) + [ TableBody + ( "" , [] , [] ) + (RowHeadColumns 0) + [] + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Orange" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Apple" ] ] ] - ) - [ TableBody - ( "", [], [] ) - ( RowHeadColumns 0 ) [] - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "apple" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "ice", Space, Str "cream" ] ] - ] + , Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Bread" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Table + ( "" , [] , [] ) + (Caption Nothing []) + [ ( AlignDefault , ColWidthDefault ) + , ( AlignDefault , ColWidthDefault ) + ] + (TableHead + ( "" , [] , [] ) + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "fruit" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "topping" ] ] + ] + ]) + [ TableBody + ( "" , [] , [] ) + (RowHeadColumns 0) + [] + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "apple" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para + [ Str "ice" + , Space + , Str "cream" + ] + ] + ] + ] + ] + (TableFoot ( "" , [] , [] ) []) + ] + ] + , Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Butter" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Ice" , Space , Str "cream" ] ] ] - ] - ( TableFoot ( "", [], [] ) [] ) ] - ] - , Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Butter" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Ice", Space, Str "cream" ] ] - ] ] - ] - ( TableFoot ( "", [], [] ) [] ) + (TableFoot ( "" , [] , [] ) []) , Table - ( "", [], [] ) - ( Caption Nothing [] ) - [ ( AlignDefault, ColWidthDefault ) ] - ( TableHead - ( "", [], [] ) - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) [] - ] - ] - ) - [ TableBody - ( "", [], [] ) - ( RowHeadColumns 0 ) [] - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "Orange" ] ] - ] + ( "" , [] , [] ) + (Caption Nothing []) + [ ( AlignDefault , ColWidthDefault ) ] + (TableHead + ( "" , [] , [] ) + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [] + ] + ]) + [ TableBody + ( "" , [] , [] ) + (RowHeadColumns 0) + [] + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "Orange" ] ] + ] + ] ] - ] - ( TableFoot ( "", [], [] ) [] ) + (TableFoot ( "" , [] , [] ) []) , Para - [ Str "Paragraph" - , Space - , Str "after" - , Space - , Str "the" - , Space - , Str "table." - ] + [ Str "Paragraph" + , Space + , Str "after" + , Space + , Str "the" + , Space + , Str "table." + ] , Table - ( "", [], [] ) - ( Caption Nothing [] ) - [ - ( AlignDefault, ColWidthDefault ) - , - ( AlignDefault, ColWidthDefault ) - ] - ( TableHead - ( "", [], [] ) - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "fruit" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "topping" ] ] - ] + ( "" , [] , [] ) + (Caption Nothing []) + [ ( AlignDefault , ColWidthDefault ) + , ( AlignDefault , ColWidthDefault ) ] - ) - [ TableBody - ( "", [], [] ) - ( RowHeadColumns 0 ) [] - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "apple" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "ice", Space, Str "cream" ] ] - ] + (TableHead + ( "" , [] , [] ) + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "fruit" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "topping" ] ] + ] + ]) + [ TableBody + ( "" , [] , [] ) + (RowHeadColumns 0) + [] + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "apple" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "ice" , Space , Str "cream" ] ] + ] + ] ] - ] - ( TableFoot ( "", [], [] ) [] ) - , Header 2 - ( "notes", [], [] ) - [ Str "notes" ] + (TableFoot ( "" , [] , [] ) []) + , Header 2 ( "notes" , [] , [] ) [ Str "notes" ] , Para - [ Str "My", Space, Str "note!", Note [ Plain [ Str "This." ] ] ] + [ Str "My" + , Space + , Str "note!" + , Note [ Plain [ Str "This." ] ] + ] , Para - [ Str "URL" - , Space - , Str "note." - , Note - [ Plain - [ Link - ( "", [], [] ) - [ Str "http://docs.python.org/library/functions.html#range" ] - ( "http://docs.python.org/library/functions.html#range", "" ) - ] + [ Str "URL" + , Space + , Str "note." + , Note + [ Plain + [ Link + ( "" , [] , [] ) + [ Str + "http://docs.python.org/library/functions.html#range" + ] + ( "http://docs.python.org/library/functions.html#range" + , "" + ) + ] + ] ] - ] ] -- cgit v1.2.3