--- parser3/www/htdocs/Attic/index.html 2002/09/17 15:20:35 1.145
+++ parser3/www/htdocs/Attic/index.html 2002/09/20 13:09:49 1.152
@@ -243,10 +243,103 @@ $response:charset[windows-1251]
#^duplicatehashsqlkey[]
#^longlreplace[]
#^table2hash_onecolumn[]
-^crossopvars[]
+#^crossopvars[]
+#^three[]
+#^badLangAfterCatch[]
+#^zeroinstdin[]
+#^shifts[]
+#^jspace[]
+#^user-foreach-test[]
+#^touchittest[]
+#^hashselfmodification[]
+#^emptyTransformResult[]
+#^badxdoccreate[]
+^if(-d "/"){y}{n}
OK
+
+@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
+}
+
+@jspace[]
+$a(1)
+^jspace_call{^eval($a*2)}
+#$a(2)
+#$junction
+
+@jspace_call[param][a]
+$a[unrelcfgdfgated]
+$junction
+$junction.a(2)
+$junction
+
+@shifts[]
+^eval(1<<3)
+^eval(8>>2)
+#^if(1=1){y;n}
+
+
+@zeroinstdin[]
+#$f[^file::exec[a.pl;$.stdin[$.shit[]]]]
+$f[^file::exec[a.pl;$.stdin[^file::load[binary;1z2.txt]]]]
+=$f.text=
+^f.save[binary;1z2.out]
+
+@badLangAfterCatch[]
+^try{
+ $a[
+ тут язык сменился на pass_appended
+ ^throw[user;test]
+ и улетело с не тем языком
+ ]
+}{
+ $exception.handled(1)
+}
+1 2
+
@crossopvars[]
#^one[]
^two[]