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.

1 files changed, 41 insertions, 47 deletions

diff --git a/test/rtf/formatting.native b/test/rtf/formatting.native
index 6e5001de3..7035ccb91 100644
--- a/test/rtf/formatting.native
+++ b/test/rtf/formatting.native
@@ -1,51 +1,45 @@
 Pandoc
-  ( Meta
-    { unMeta = fromList
-      [
-        ( "operator"
-        , MetaInlines
-          [ Str "John", Space, Str "MacFarlane" ]
-        )
-      ]
+  Meta
+    { unMeta =
+        fromList
+          [ ( "operator"
+            , MetaInlines [ Str "John" , Space , Str "MacFarlane" ]
+            )
+          ]
     }
-  )
   [ Para
-    [ Str "This"
-    , Space
-    , Str "is"
-    , Space
-    , Str "a"
-    , Space
-    , Str "test"
-    , Space
-    , Str "of"
-    , Space
-    , Str "FORMATTING."
-    , Space
-    , Str "This"
-    , Space
-    , Str "is"
-    , Space
-    , Str "hidden:"
-    , Space
-    , Str "."
-    ]
-  , Para
-    [ SmallCaps [ Str "Small", Space, Str "Caps" ] ]
-  , Para
-    [ Strong [ Str "bold" ] ]
-  , Para
-    [ Emph [ Str "italics" ] ]
-  , Para
-    [ Strong
-      [ Str "bold", Space, Emph [ Str "and", Space, Str "italics" ] ]
-    ]
-  , Para
-    [ Underline [ Str "underlined" ] ]
-  , Para
-    [ Strikeout [ Str "strikeout" ] ]
-  , Para
-    [ Str "x", Superscript [ Str "superscript" ] ]
-  , Para
-    [ Str "x", Subscript [ Str "subscript" ] ]
+      [ Str "This"
+      , Space
+      , Str "is"
+      , Space
+      , Str "a"
+      , Space
+      , Str "test"
+      , Space
+      , Str "of"
+      , Space
+      , Str "FORMATTING."
+      , Space
+      , Str "This"
+      , Space
+      , Str "is"
+      , Space
+      , Str "hidden:"
+      , Space
+      , Str "."
+      ]
+  , Para [ SmallCaps [ Str "Small" , Space , Str "Caps" ] ]
+  , Para [ Strong [ Str "bold" ] ]
+  , Para [ Emph [ Str "italics" ] ]
+  , Para
+      [ Strong
+          [ Str "bold"
+          , Space
+          , Emph [ Str "and" , Space , Str "italics" ]
+          ]
+      ]
+  , Para [ Underline [ Str "underlined" ] ]
+  , Para [ Strikeout [ Str "strikeout" ] ]
+  , Para [ Str "x" , Superscript [ Str "superscript" ] ]
+  , Para [ Str "x" , Subscript [ Str "subscript" ] ]
   ]