--- parser3/tests/149.html 2007/08/20 09:20:15 1.2 +++ parser3/tests/149.html 2010/07/25 06:23:41 1.4 @@ -4,7 +4,7 @@ $xdoc[^xdoc::create{ - ПИФ^taint[&] + ПИФ^taint[&] P«^;AF B @@ -57,19 +57,15 @@ $man1[^xdoc.selectSingle[/people/man[@id $name2[^xdoc.selectSingle[/people/man[@id=1]/name]] /people/man[@id=1]/name ^if(^name2.hasAttributes[]){has;hasn't} attributes
- - @dump[sTitle;xdoc] ^if(def $sTitle){

$sTitle

} ^show_xdoc2[$xdoc]
^show_xnode1[$xdoc]

- - @show1[array][i;x;pattributes] ^for[i](0;$array-1){ - $x[$array.$i] + $x[$array.$i] $x.firstChild.nodeValue: $pattributes[$x.parentNode.attributes] ^if(^pattributes._count[]){ @@ -78,43 +74,37 @@ $name2[^xdoc.selectSingle[/people/man[@i
} - - @show_xnodes1[array][i] ^for[i](0;^array._count[]-1){ ^show_xnode1[$array.$i;0;1] } - - @show_xnode1[x;level;single][l;pairs;names] ^if(def $x){ - ^for[l](0;$level-1){ ^; ^; ^; ^;} - ^if($x.nodeType == $xnode:ELEMENT_NODE){ - <^;$x.nodeName - $pairs[$x.attributes] - ^if(def $pairs){ - $names[^pairs._keys[]] - ^names.menu{ $names.key="$pairs.[$names.key].nodeValue"} - } - >^; - }{ - [$x.nodeType] - } - - ^if(def $x.nodeValue){$x.nodeValue}
- ^show_xnode1[$x.firstChild]($level+1) - ^if(!$single){ - ^show_xnode1[$x.nextSibling]($level) - } - - ^if($x.nodeType == $xnode:ELEMENT_NODE){ - ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;
- } + ^for[l](0;$level-1){ ^; ^; ^; ^;} + ^if($x.nodeType == $xnode:ELEMENT_NODE){ + <^;$x.nodeName + $pairs[$x.attributes] + ^if(def $pairs){ + $names[^pairs._keys[]] + ^names.menu{ $names.key="$pairs.[$names.key].nodeValue"} + } + >^; + }{ + [$x.nodeType] + } + + ^if(def $x.nodeValue){$x.nodeValue}
+ ^show_xnode1[$x.firstChild]($level+1) + ^if(!$single){ + ^show_xnode1[$x.nextSibling]($level) + } + + ^if($x.nodeType == $xnode:ELEMENT_NODE){ + ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;
+ } } - - @show_xdoc2[xdoc] #$response:body[^xdoc.file[ $.media-type[text/paf] ]]
^taint[html][^xdoc.string[