pandoc/test/fb2/reader/notes.native

Pandoc
  ( Meta { unMeta = fromList [] } )
  [ Div
    ( "", [ "section" ], [] )
    [ Para
      [ Str "Note"
      , Space
      , Note
        [ Para [ Str "Note", Space, Str "contents" ] ]
      , Str "."
      ]
    , Para
      [ Str "Second"
      , Space
      , Str "note"
      , Space
      , Note
        [ Para
          [ Str "Second", Space, Str "note", Space, Str "contents." ]
        ]
      , Str "."
      ]
    ]
  ]
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 [] } )`
			`[ Div`
			`( "", [ "section" ], [] )`
			`[ Para`
			`[ Str "Note"`
			`, Space`
			`, Note`
			`[ Para [ Str "Note", Space, Str "contents" ] ]`
			`, Str "."`
			`]`
			`, Para`
			`[ Str "Second"`
			`, Space`
			`, Str "note"`
			`, Space`
			`, Note`
			`[ Para`
			`[ Str "Second", Space, Str "note", Space, Str "contents." ]`
			`]`
			`, Str "."`
			`]`
			`]`
			`]`