diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2021-09-28 21:17:53 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2021-09-28 21:17:53 -0700 |
| commit | 0bdcf415e4eff83ad8e35c1d41c8a28e0bbd5da1 (patch) | |
| tree | c9bda08418e67755254ad2d1d2e95dd691bd1902 /test/rtf/table_simple.native | |
| parent | 8018179b3df34cd7fdbd77c7a08b21fd8d5b5b31 (diff) | |
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.
Diffstat (limited to 'test/rtf/table_simple.native')
| -rw-r--r-- | test/rtf/table_simple.native | 133 |
1 files changed, 69 insertions, 64 deletions
diff --git a/test/rtf/table_simple.native b/test/rtf/table_simple.native index 05e736829..dce03cf25 100644 --- a/test/rtf/table_simple.native +++ b/test/rtf/table_simple.native @@ -1,68 +1,73 @@ Pandoc - ( Meta { unMeta = fromList [] } ) + Meta { unMeta = fromList [] } [ Table - ( "", [], [] ) - ( Caption Nothing [] ) - [ - ( AlignDefault, ColWidthDefault ) - , - ( AlignDefault, ColWidthDefault ) - , - ( AlignDefault, ColWidthDefault ) - , - ( AlignDefault, ColWidthDefault ) - ] - ( TableHead ( "", [], [] ) [] ) - [ TableBody - ( "", [], [] ) - ( RowHeadColumns 0 ) [] - [ Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "A" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "B" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "C" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "D" ] ] - ] - , Row - ( "", [], [] ) - [ Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "E" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "F" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "G" ] ] - , Cell - ( "", [], [] ) AlignDefault - ( RowSpan 1 ) - ( ColSpan 1 ) - [ Para [ Str "H" ] ] - ] + ( "" , [] , [] ) + (Caption Nothing []) + [ ( AlignDefault , ColWidthDefault ) + , ( AlignDefault , ColWidthDefault ) + , ( AlignDefault , ColWidthDefault ) + , ( AlignDefault , ColWidthDefault ) ] - ] - ( TableFoot ( "", [], [] ) [] ) + (TableHead ( "" , [] , [] ) []) + [ TableBody + ( "" , [] , [] ) + (RowHeadColumns 0) + [] + [ Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "A" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "B" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "C" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "D" ] ] + ] + , Row + ( "" , [] , [] ) + [ Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "E" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "F" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "G" ] ] + , Cell + ( "" , [] , [] ) + AlignDefault + (RowSpan 1) + (ColSpan 1) + [ Para [ Str "H" ] ] + ] + ] + ] + (TableFoot ( "" , [] , [] ) []) ] |