1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
DocAppend
(DocParagraph (DocString "Single outer cell:"))
(DocAppend
(DocTable
Table
{tableBodyRows = [TableRow
[TableCell
{tableCellColspan = 1,
tableCellContents = DocString
(concat
[" outer \n",
" \n",
"-------+ \n",
" inner | "]),
tableCellRowspan = 1}]],
tableHeaderRows = []})
(DocAppend
(DocParagraph (DocString "Broken (only inner cell is rendered):"))
(DocTable
Table
{tableBodyRows = [TableRow
[TableCell
{tableCellColspan = 1,
tableCellContents = DocString " inner ",
tableCellRowspan = 1}]],
tableHeaderRows = []})))
|
