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