--- parser3/www/htdocs/Attic/index.html 2002/10/15 10:58:34 1.164 +++ parser3/www/htdocs/Attic/index.html 2002/10/23 08:35:23 1.171 @@ -12,9 +12,12 @@ $response:charset[windows-1251] #$response:charset[empty] #$response:content-type[$.value[text/html]$.charset[$response:charset]] -#@postprocess[body] +@postprocess[body] #$body #$result[123] +$body +
+OK @main[] #$a(123) @@ -266,7 +269,86 @@ $response:charset[windows-1251] #^includet[] #^derived:includet[] #^fortestsep[] -^derived:inclass_process_test[] +#^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]
+#^file:fullpath[/abs/a.gif]
+#$form:a/$form:image-map= +#^foreachform[] +#^selectSingleoct[] +#^compilebug[] +#^badhashcreate[] +^badsendmail[] + +@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[] +one
+two
+ +^form:fields.foreach[key;value]{ + $key -- $value +}[
] +
+$nameless[$form:tables.nameless] +^if(def $nameless){ + nameless table -- ^nameless.menu{$nameless.field}[,] +} +^if(def $form:imap){ +
+ 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}
+^if(def $if){defined;not defined}
+ +@domorigint[] +$xdoc[^xdoc::create[вася]] +^xdoc.firstChild.setAttribute[name;значение] +$var[$xdoc.firstChild.nodeName] +^throw[paf;$var] + @fortestsep[][i] ^for[i](1;3){$i}[,]