pandoc/test/fb2/reader/titles.native

Pandoc
  ( Meta { unMeta = fromList [] } )
  [ Header 1
    ( "", [], [] )
    [ Str "Body", Space, Str "title" ]
  , Div
    ( "", [ "section" ], [] )
    [ Header 2
      ( "", [], [] )
      [ Str "Section", Space, Str "title" ]
    , Div
      ( "", [ "section" ], [] )
      [ Header 3
        ( "", [], [] )
        [ Str "Subsection"
        , Space
        , Str "title"
        , LineBreak
        , Str "with"
        , Space
        , Str "multiple"
        , Space
        , Str "paragraphs"
        ]
      ]
    , Div
      ( "", [ "section" ], [] )
      [ Header 3
        ( "", [], [] )
        [ Str "Another", Space, Str "subsection", Space, Str "title" ]
      ]
    ]
  ]
Use pretty-simple to format native output. Previously we used our own homespun formatting. But this produces over-long lines that aren't ideal for diffs in tests. Easier to use something off-the-shelf and standard. Closes #7580. Performance is slower by about a factor of 10, but this isn't really a problem because native isn't suitable as a serialization format. (For serialization you should use json, because the reader is so much faster than native.) 2021-09-19 21:09:51 +02:00			`Pandoc`
			`( Meta { unMeta = fromList [] } )`
			`[ Header 1`
			`( "", [], [] )`
			`[ Str "Body", Space, Str "title" ]`
			`, Div`
			`( "", [ "section" ], [] )`
			`[ Header 2`
			`( "", [], [] )`
			`[ Str "Section", Space, Str "title" ]`
			`, Div`
			`( "", [ "section" ], [] )`
			`[ Header 3`
			`( "", [], [] )`
			`[ Str "Subsection"`
			`, Space`
			`, Str "title"`
			`, LineBreak`
			`, Str "with"`
			`, Space`
			`, Str "multiple"`
			`, Space`
			`, Str "paragraphs"`
			`]`
			`]`
			`, Div`
			`( "", [ "section" ], [] )`
			`[ Header 3`
			`( "", [], [] )`
			`[ Str "Another", Space, Str "subsection", Space, Str "title" ]`
			`]`
			`]`
			`]`