blob: 968d390f13dc0050e8ff720c7845d9a6899d0be8 (
plain) (
blame)
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
discard """
output: true
"""
import htmlparser
import xmltree
import strutils
from streams import newStringStream
## builds the two cases below and test that
## ``//[dd,li]`` has "<p>that</p>" as children
##
## <dl>
## <dt>this</dt>
## <dd>
## <p>that</p>
## </dd>
## </dl>
##
## <ul>
## <li>
## <p>that</p>
## </li>
## </ul>
for ltype in [["dl","dd"], ["ul","li"]]:
let desc_item = if ltype[0]=="dl": "<dt>this</dt>" else: ""
let item = "$1<$2><p>that</p></$2>" % [desc_item, ltype[1]]
let list = """ <$1>
$2
</$1> """ % [ltype[0], item]
var errors : seq[string] = @[]
let parseH = parseHtml(newStringStream(list),"statichtml", errors =errors)
if $parseH.findAll(ltype[1])[0].child("p") != "<p>that</p>":
echo "case " & ltype[0] & " failed !"
quit(2)
echo "true"
|