--- parser3/src/www/htdocs/Attic/index.html 2001/05/08 06:07:51 1.170
+++ parser3/src/www/htdocs/Attic/index.html 2001/05/08 10:24:07 1.175
@@ -1,5 +1,27 @@
@main[]
-^OP:eval(1<2)
+$t1[^table:set{key value
+1 v1
+2 v2}]
+$h1[^t1.hash[key]]
+^h1.default[$value[nothing]]
+^$h1.2.value=$h1.2.value
+
+$t2[^table:set{key a b
+1 a1
+2 a2 b2
+}]
+t2 ^if(^t2.empty[]){empty}{not empty}
+^t2.offset(1)
+$t2.b
+$r[^t2.record[]]
+
+$th[^t2.hash[b]]
+^$th.b2.a=$th.b2.a
+
+$th[^t2.hash[key;a]]
+^$th.2.a=$th.2.a
+
+#^OP:eval(1<2)
$filelist[^table:dir[.]]
@@ -10,8 +32,8 @@ $branches[^table:set{name val
index.cgihtml 123
}]
$splitURI[^request:uri.lsplit[/]]
- ^branches.locate[name;$splitURI.1]
- $branches.name
+name ^if(^branches.locate[name;$splitURI.1]){found;not found}:
+$branches.name
$splitURI[^request:uri.lsplit[/]]
$splitURI.0!$splitURI.1