--- parser3/src/www/htdocs/Attic/index.html 2001/09/04 19:03:23 1.291
+++ parser3/src/www/htdocs/Attic/index.html 2001/09/07 08:47:52 1.295.2.2
@@ -3,7 +3,15 @@ t.p
dtf.p
@main[]
-^timghtmlyu[]
+#^tdupleform[]
+#^tvoiddefault[]
+^testdom0[]
+#^testlocal[0]
+#^thashdefault2[]
+#^tcase2[]
+#^tlsplit2[]
+#^tconnect[]
+#^timghtmlyu[]
#^timghtml[]
#^tresult[]
#^voidtest[]
@@ -27,6 +35,51 @@ dtf.p
#^tests[]
#^func(0)
+@tdupleform[]
+#$c[^form:a.columns[]]
+#^c.menu{$c.column}[,]
+^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
+^if($level<10){
+ ^testlocal($level+1)
+}
+after($level):$local
+
+@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}}
+
@timghtmlyu[]
^img[/i/commons_22_prev.gif][$.vspace(100)]