--- parser3/www/htdocs/Attic/index.html 2002/09/20 09:26:33 1.151
+++ parser3/www/htdocs/Attic/index.html 2002/09/24 10:24:23 1.155
@@ -249,14 +249,74 @@ $response:charset[windows-1251]
#^zeroinstdin[]
#^shifts[]
#^jspace[]
-^user-foreach[key;value]{$key=$value
}
+#^user-foreach-test[]
+#^touchittest[]
+#^hashselfmodification[]
+#^emptyTransformResult[]
+#^badxdoccreate[]
+#^if(-d "CVS"){y}{n}
+#^badjunctioncall[]
+^russianindex[]
OK
+@russianindex[]
+#dir with files with russian-lang names
+$where[dir]
+
+$dir[^file:list[$where;\.txt^$]]
+^dir.menu{
+ $dir.name
+}
+
+@badjunctioncall[]
+^badjunctioncallinside{code}
+
+@badjunctioncallinside[code]
+xx^code[]
+
+@badxdoccreate[]
+$xdoc[^xdoc::create[вася]]
+#$xdoc[^xdoc::create{вася}]
+
+^xdoc.firstChild.setAttribute[name;значение]
+^xdoc.string[]
+
+
+@emptyTransformResult[]
+$input[^xdoc::create[docBad]]
+$sheet[^xdoc::create{
+
+
+ output
+
+
+}]
+$output[^input.transform[$sheet]]
+$response:body[^output.file[]]
+
+@hashselfmodification[]
+$hash[
+ $.a[1]
+ $.b[2]
+]
+^hash.foreach[key;value]{
+# $hash.c[1]
+ $hash.a[1]
+}
+
+@touchittest[][i]
+^touchit[]
+$i
+
+
+@user-foreach-test[][key;value]
+^user-foreach[key;value]{$key=$value
}
+
@user-foreach[key;value;code]
^for[i](1;10){
- $code.key($i)
- $code.value($i*2)
+ $code.$key($i)
+ $code.$value($i*2)
$code
}
@@ -645,7 +705,9 @@ $sheet[^xdoc::create{
- z
+
+
+z
para1=