|
|
| version 1.159, 2002/10/14 11:28:45 | version 1.174, 2002/10/31 10:23:45 |
|---|---|
| Line 12 $response:charset[windows-1251] | Line 12 $response:charset[windows-1251] |
| #$response:charset[empty] | #$response:charset[empty] |
| #$response:content-type[$.value[text/html]$.charset[$response:charset]] | #$response:content-type[$.value[text/html]$.charset[$response:charset]] |
| #@postprocess[body] | @postprocess[body] |
| #<b>$body</b> | #<b>$body</b> |
| #$result[123] | #$result[123] |
| $body | |
| <hr> | |
| OK | |
| @main[] | @main[] |
| #$a(123) | #$a(123) |
| Line 233 $response:charset[windows-1251] | Line 236 $response:charset[windows-1251] |
| #^mail2[] | #^mail2[] |
| #^exec[] | #^exec[] |
| #^passpost[] | #^passpost[] |
| #^menudelim[] | |
| #^fordelim[] | #^fordelim[] |
| #^duplicatetable2hashkey[] | #^duplicatetable2hashkey[] |
| #^duplicatehashsqlkey[] | #^duplicatehashsqlkey[] |
| Line 245 $response:charset[windows-1251] | Line 247 $response:charset[windows-1251] |
| #^zeroinstdin[] | #^zeroinstdin[] |
| #^shifts[] | #^shifts[] |
| #^jspace[] | #^jspace[] |
| #^user-foreach-test[] | |
| #^hashselfmodification[] | #^hashselfmodification[] |
| #^emptyTransformResult[] | #^emptyTransformResult[] |
| #^badxdoccreate[] | #^badxdoccreate[] |
| Line 256 $response:charset[windows-1251] | Line 257 $response:charset[windows-1251] |
| #^xml[] | #^xml[] |
| #^mail4[] | #^mail4[] |
| #^voidconstructorpass[] | #^voidconstructorpass[] |
| #^touchittest[] | |
| #^$form:CLASS.a=$form:CLASS.a<br> | #^$form:CLASS.a=$form:CLASS.a<br> |
| ^cookie2[] | #^cookie2[] |
| #^menudelim[] | |
| #^touchittest[] | |
| #^touchittest2[] | |
| #^opauto[] | |
| #^trycontextt[] | |
| #^tfor[] | |
| #^user-foreach-test[] | |
| #^includet[] | |
| #^derived:includet[] | |
| #^fortestsep[] | |
| #^derived:inclass_process_test[] | |
| #$derived[^derived::create[]]^derived.inclass_process_test[] | |
| #^domorigint[] | |
| #^junctiontest2[] | |
| #^junctionselftest[] | |
| #^bad-compiletosystem[] | |
| #^steppedfor[i](1;10;2){$i } | |
| #^file:fullpath[a.gif]<br> | |
| #^file:fullpath[/abs/a.gif]<br> | |
| #$form:a/$form:image-map= | |
| #^foreachform[] | |
| #^selectSingleoct[] | |
| #^compilebug[] | |
| #^badhashcreate[] | |
| #^badsendmail[] | |
| #^keygenedhash[]<br> | |
| #<hr>[$env:HTTP_REFERER] | |
| #$response:Content-TypE[bad] | |
| #^emailhead2[] | |
| ^includet2override[] | |
| @includet2override[] | |
| #^derived:includet2override[] | |
| $derived[^derived::create[]] | |
| ^derived.includet2override[] | |
| @emailhead2[] | |
| ^mail:send[ | |
| $.charset[koi8-r] | |
| $.from[paf@design.ru] | |
| $.to[paf@mail] | |
| # $.reply-to[^taint[agat] <^taint[ag_7k@mail.ru]>] | |
| $user[^taint[agat]] | |
| $email[^taint[ag_7k@mail.ru]] | |
| $.reply-to[$user $email] | |
| $.subject[test2] | |
| ] | |
| @keygenedhash[] | |
| $table[^table::create{key value | |
| 1 a | |
| 2 b | |
| }] | |
| $hash[^table.hash($table.key*2)] | |
| '$hash.4.value' must be 'b' | |
| @badsendmail[] | |
| ^mail:send[ | |
| $.from[hren < paf@design.ru | |
| >] | |
| $.to[paf@design.ru] | |
| $.subject[test] | |
| ] | |
| @badhashcreate[] | |
| $hash[ | |
| $.ok[1] | |
| ] | |
| $.bad[1] | |
| @compilebug[] | |
| ^a[]^#31= | |
| @selectSingleoct[] | |
| $d[^xdoc::create[doc]] | |
| $element[^d.selectSingle[$nothing]] | |
| @foreachform[] | |
| <a href=index.cgihtml?one&a=1&two&b=2&three?1,2>one</a><br> | |
| <a href=index.cgihtml?one&a=1&two&b=2&three?shit>two</a><br> | |
| ^form:fields.foreach[key;value]{ | |
| $key -- $value | |
| }[<br>] | |
| <hr> | |
| $nameless[$form:tables.nameless] | |
| ^if(def $nameless){ | |
| nameless table -- ^nameless.menu{$nameless.field}[,] | |
| } | |
| ^if(def $form:imap){ | |
| <hr> | |
| IMAP $form:imap.x : $form:imap.y | |
| } | |
| @steppedfor[name;from;to;step;code] | |
| $caller.$name($from) | |
| ^while($caller.$name<=$to){ | |
| $code | |
| ^caller.$name.inc($step) | |
| } | |
| @bad-compiletosystem[] | |
| ^process[$string:CLASS]{@a[] | |
| } | |
| @junctionselftest[] | |
| $derived[^derived::create[]]^derived.explodejunction{$tomain[tomainOK]} | |
| ^$tomain=$tomain | |
| @junctiontest2[] | |
| ^if($if is junction){is junction;not junction}<br> | |
| ^if(def $if){defined;not defined}<br> | |
| @domorigint[] | |
| $xdoc[^xdoc::create[вася]] | |
| ^xdoc.firstChild.setAttribute[name;значение] | |
| $var[$xdoc.firstChild.nodeName] | |
| ^throw[paf;$var] | |
| @fortestsep[][i] | |
| ^for[i](1;3){$i}[,] | |
| @includet[] | |
| ^include[some.p] | |
| ^included_method[2] | |
| @user-foreach-test[][key;value] | |
| ^user-foreach[key;value]{$key=$value<br>} | |
| @user-foreach[key;value;code] | |
| ^for[i](1;10){ | |
| $caller.$key($i) | |
| $caller.$value($i*2) | |
| $code | |
| } | |
| @tfor[][i] | |
| ^for[i](1;10){ | |
| $i | |
| } | |
| @trycontextt[] | |
| ^try{ | |
| ^trycontexttsub[] | |
| }{ | |
| $exception.handled(0) | |
| } | |
| @trycontexttsub[] | |
| ^bad[] | |
| @opauto[] | |
| ^reada[] | |
| @rusage2[] | @rusage2[] |
| Line 327 $i[before] | Line 485 $i[before] |
| ^touchit[] | ^touchit[] |
| $i | $i |
| @touchittest2[] | |
| $i[before] | |
| ^touchit[] | |
| $i | |
| @user-foreach-test[][key;value] | |
| ^user-foreach[key;value]{$key=$value<br>} | |
| @user-foreach[key;value;code] | |
| ^for[i](1;10){ | |
| $code.$key($i) | |
| $code.$value($i*2) | |
| $code | |
| } | |
| @jspace[] | @jspace[] |
| $a(1) | $a(1) |