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, 40 insertions, 2 deletions

diff --git a/test/command/3534.md b/test/command/3534.md
index cd0915d88..1be10cf62 100644
--- a/test/command/3534.md
+++ b/test/command/3534.md
@@ -18,7 +18,26 @@ I want to explain the interface of \lstinline{public class MyClass}.
 % pandoc -f latex -t native
 I want to explain the interface of \lstinline[language=Java]{public class MyClass}.
 ^D
-[Para [Str "I",Space,Str "want",Space,Str "to",Space,Str "explain",Space,Str "the",Space,Str "interface",Space,Str "of",Space,Code ("",["java"],[]) "public class MyClass",Str "."]]
+[ Para
+  [ Str "I"
+  , Space
+  , Str "want"
+  , Space
+  , Str "to"
+  , Space
+  , Str "explain"
+  , Space
+  , Str "the"
+  , Space
+  , Str "interface"
+  , Space
+  , Str "of"
+  , Space
+  , Code
+    ( "", [ "java" ], [] ) "public class MyClass"
+  , Str "."
+  ]
+]
 ```
 
 ```
@@ -41,5 +60,24 @@ I want to explain the interface of \mintinline{java}|public class MyClass|.
 % pandoc -f latex -t native
 I want to explain the interface of \mintinline[linenos]{java}{public class MyClass}.
 ^D
-[Para [Str "I",Space,Str "want",Space,Str "to",Space,Str "explain",Space,Str "the",Space,Str "interface",Space,Str "of",Space,Code ("",["java"],[]) "public class MyClass",Str "."]]
+[ Para
+  [ Str "I"
+  , Space
+  , Str "want"
+  , Space
+  , Str "to"
+  , Space
+  , Str "explain"
+  , Space
+  , Str "the"
+  , Space
+  , Str "interface"
+  , Space
+  , Str "of"
+  , Space
+  , Code
+    ( "", [ "java" ], [] ) "public class MyClass"
+  , Str "."
+  ]
+]
 ```