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.)

1 files changed, 50 insertions, 17 deletions

diff --git a/test/command/4848.md b/test/command/4848.md
index 2cd2bab34..3110b90cc 100644
--- a/test/command/4848.md
+++ b/test/command/4848.md
@@ -2,21 +2,29 @@
 % pandoc -f latex -t native
 \enquote*{hi}
 ^D
-[Para [Quoted SingleQuote [Str "hi"]]]
+[ Para [ Quoted SingleQuote [ Str "hi" ] ] ]
 ```
 
 ```
 % pandoc -f latex -t native
 \foreignquote{italian}{hi}
 ^D
-[Para [Quoted DoubleQuote [Span ("",[],[("lang","it")]) [Str "hi"]]]]
+[ Para
+  [ Quoted DoubleQuote
+    [ Span ( "", [], [ ( "lang", "it" ) ] ) [ Str "hi" ] ]
+  ]
+]
 ```
 
 ```
 % pandoc -f latex -t native
 \hyphenquote*{italian}{hi}
 ^D
-[Para [Quoted SingleQuote [Span ("",[],[("lang","it")]) [Str "hi"]]]]
+[ Para
+  [ Quoted SingleQuote
+    [ Span ( "", [], [ ( "lang", "it" ) ] ) [ Str "hi" ] ]
+  ]
+]
 ```
 
 ```
@@ -25,10 +33,13 @@ Lorem ipsum
 \blockquote{dolor sit amet}
 consectetuer.
 ^D
-[Para [Str "Lorem",Space,Str "ipsum"]
-,BlockQuote
- [Para [Str "dolor",Space,Str "sit",Space,Str "amet"]]
-,Para [Str "consectetuer."]]
+[ Para
+  [ Str "Lorem", Space, Str "ipsum" ]
+, BlockQuote
+  [ Para [ Str "dolor", Space, Str "sit", Space, Str "amet" ] ]
+, Para
+  [ Str "consectetuer." ]
+]
 ```
 
 ```
@@ -37,11 +48,28 @@ Lorem ipsum
 \blockcquote[198]{Knu86}{dolor sit amet}
 consectetuer.
 ^D
-[Para [Str "Lorem",Space,Str "ipsum"]
-,BlockQuote
- [Para [Str "dolor",Space,Str "sit",Space,Str "amet"]
- ,Para [Cite [Citation {citationId = "Knu86", citationPrefix = [], citationSuffix = [Str "198"], citationMode = NormalCitation, citationNoteNum = 0, citationHash = 0}] []]]
-,Para [Str "consectetuer."]]
+[ Para
+  [ Str "Lorem", Space, Str "ipsum" ]
+, BlockQuote
+  [ Para
+    [ Str "dolor", Space, Str "sit", Space, Str "amet" ]
+  , Para
+    [ Cite
+      [ Citation
+        { citationId = "Knu86"
+        , citationPrefix = []
+        , citationSuffix =
+          [ Str "198" ]
+        , citationMode = NormalCitation
+        , citationNoteNum = 0
+        , citationHash = 0
+        }
+      ] []
+    ]
+  ]
+, Para
+  [ Str "consectetuer." ]
+]
 ```
 
 ```
@@ -50,10 +78,15 @@ Lorem ipsum
 \foreignblockquote{italian}{dolor sit amet}
 consectetuer.
 ^D
-[Para [Str "Lorem",Space,Str "ipsum"]
-,BlockQuote
- [Div ("",[],[("lang","it")])
-  [Para [Str "dolor",Space,Str "sit",Space,Str "amet"]]]
-,Para [Str "consectetuer."]]
+[ Para
+  [ Str "Lorem", Space, Str "ipsum" ]
+, BlockQuote
+  [ Div
+    ( "", [], [ ( "lang", "it" ) ] )
+    [ Para [ Str "dolor", Space, Str "sit", Space, Str "amet" ] ]
+  ]
+, Para
+  [ Str "consectetuer." ]
+]
 ```