--- parser3/www/htdocs/Attic/index.html 2002/09/18 08:52:50 1.148
+++ parser3/www/htdocs/Attic/index.html 2002/09/20 09:26:33 1.151
@@ -245,10 +245,45 @@ $response:charset[windows-1251]
#^table2hash_onecolumn[]
#^crossopvars[]
#^three[]
-^badLangAfterCatch[]
+#^badLangAfterCatch[]
+#^zeroinstdin[]
+#^shifts[]
+#^jspace[]
+^user-foreach[key;value]{$key=$value
}
OK
+@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[