--- parser3/src/www/htdocs/Attic/index.html	2001/09/05 11:02:02	1.293
+++ parser3/src/www/htdocs/Attic/index.html	2001/09/07 12:46:19	1.297
@@ -3,7 +3,14 @@ t.p
 dtf.p
 
 @main[]
-^tconnect[]
+^tdupleform[]
+#^tvoiddefault[]
+#^testdom0[]
+#^testlocal[0]
+#^thashdefault2[]
+#^tcase2[]
+#^tlsplit2[]
+#^tconnect[]
 #^timghtmlyu[]
 #^timghtml[]
 #^tresult[]
@@ -28,6 +35,48 @@ dtf.p
 #^tests[]
 #^func(0)<hr>
 
+@tdupleform[]
+$form:a
+#$c[^form:a.columns[]]
+#^c.menu{$c.column}[,]<br>
+#^form:a.menu{$form:a.element=}[,]
+
+@tvoiddefault[]
+$var[$form:element]
+^var.int(2)
+
+
+@testdom0[]
+$dom[^dom::load[test.xml]]
+
+
+@testlocal[level][local]
+$local($level)
+before($level):$local<br>
+^if($level<10){
+	^testlocal($level+1)
+}
+after($level):$local<br>
+
+@thashdefault2[]
+$hash[
+	$.a[1]
+	$.b[2]
+	$._default[xx]
+]
+$hash.c
+
+@tcase2[]
+$hash[
+	$.1{^load[code1]}
+	$.2{code2}
+]	
+$hash.1
+
+@tlsplit2[]
+$splitURI[^request:uri.mid(1;^request:uri.length[]-1).lsplit[/]]
+OK
+
 @tconnect[]
 #^connect[mysql://hren:pwd@hren/zz]{hren}
 ^connect[mysql://]{^void:sql{show tables}}