--- 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[