--- parser3/www/htdocs/Attic/index.html 2002/09/18 09:44:51 1.149 +++ parser3/www/htdocs/Attic/index.html 2002/09/20 13:09:49 1.152 @@ -246,10 +246,82 @@ $response:charset[windows-1251] #^crossopvars[] #^three[] #^badLangAfterCatch[] -^zeroinstdin[] +#^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]]]]