File:  [parser3project] / parser3 / tests / 109.html
Revision 1.5: download - view: text, annotated - select for diffs - revision graph
Sun Jul 25 06:20:48 2010 UTC (15 years, 10 months ago) by misha
Branches: MAIN
CVS tags: release_3_5_1, release_3_5_0, release_3_4_6, release_3_4_5, release_3_4_4, release_3_4_3, release_3_4_2, release_3_4_1, HEAD
- prepare tests to trim trailing methods' EOLs

@main[]
^windows-1251[]

^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: