--- parser3/src/www/htdocs/Attic/index.html	2002/01/10 15:41:50	1.516
+++ parser3/src/www/htdocs/Attic/index.html	2002/01/11 13:00:52	1.519
@@ -4,20 +4,13 @@ $response:charset[windows-1251]
 $response:content-type[$.value[text/html]$.charset[$response:charset]]
 
 @main[]
-$wl(10)
-^while($wl>0){
-	<br>$wl негритят пошли купаться в море. Один из них утоп,  ему срубили гроб,  и вот вам результат -
-	^wl.dec(1)
-	$wl негритят.
-}
-<hr>
-
+^xpath[]
 #^ttablesetlang[]
 #^mail3[]
 #^ttime[]
 #^tupper[]
 #^treplace[]
-^xslt2[]
+#^xslt2[]
 #^tcache2[]
 #$ORIGINS(1)
 #$t[^table::set{a b} ^table::set{c d}]
@@ -94,6 +87,22 @@ $wl(10)
 <hr>
 OK
 
+@xpath[]
+$xdoc[^xdoc::set{<?xml version="1.0" encoding="windows-1251" ?>
+<document><block><p>привет</p></block></document>
+}]
+#^show-xdoc2[$xdoc]
+$node[^xdoc.selectSingle['1<2']]
+^if(def $node){
+	^if($node is string){$node}
+		$node.nodeType
+	}
+#$node.firstChild.nodeValue
+}{
+	node not found
+}
+
+
 @ttablesetlang[]
 $a-tab-b[a	b
 1	2]