[BACK]Return to 109.html CVS log [TXT] [DIR] Up to [parser3project] / parser3 / tests
File:  [parser3project] / parser3 / tests / 109.html
Revision 1.2: download - view: text, annotated - select for diffs - revision graph
Thu Jul 24 11:25:58 2003 UTC (22 years, 11 months ago) by paf
Branches: MAIN
CVS tags: release_3_2_3, release_3_2_2, release_3_2_1, release_3_2_0, release_3_1_6, release_3_1_5, release_3_1_4, release_3_1_3, release_3_1_2, release_3_1_1, release_3_1_0, paf_left, HEAD
merged(copied) to HEAD from template_gc

@main[]
^domdata[]

^show_xnode1[$xdoc.documentElement;0;1]<hr>
^show_xdoc2[$xdoc]<hr>


@domdata[]
$xdoc[^xdoc::create[doc]]
$doc[$xdoc.documentElement]
$name[^doc.appendChild[^xdoc.createElement[name]]]
$text[^name.appendChild[^xdoc.createTextNode[петросян&coz]]]

@show_xnode1[x;level;single][l]
^if(def $x){
    ^for[l](0;$level-1){&nbsp^;&nbsp^;&nbsp^;&nbsp^;}
    ^if($x.nodeType == $xnode:ELEMENT_NODE){
    	&lt^;$x.nodeName
	    $pairs[$x.attributes]
	    ^if(def $pairs){
	    	$names[^pairs._keys[]]
	    	^names.menu{ $names.key="$pairs.[$names.key].nodeValue"}
	    }
	    &gt^;
    }{
    	[$x.nodeType]
    }
    
    ^if(def $x.nodeValue){$x.nodeValue}<br>
    ^show_xnode1[$x.firstChild]($level+1)
    ^if(!$single){
	    ^show_xnode1[$x.nextSibling]($level)
    }

    ^if($x.nodeType == $xnode:ELEMENT_NODE){
    ^for[l](0;$level-1){&nbsp^;&nbsp^;&nbsp^;&nbsp^;}&lt^;/$x.nodeName&gt^;<br>
    }
}

@show_xdoc2[xdoc]
<pre>^taint[html][^xdoc.string[
	$.method[html]
]]
</pre>
E-mail: