--- parser3/www/htdocs/Attic/index.html 2002/09/20 14:21:29 1.154
+++ parser3/www/htdocs/Attic/index.html 2002/10/31 15:01:58 1.175
@@ -6,15 +6,18 @@
$selffilespec[$filespec]
#$form:here
#$request:charset[UTF-8]
-$request:charset[windows-1251]
-$response:charset[windows-1251]
+##$request:charset[windows-1251]
+##$response:charset[windows-1251]
#$response:charset[UTF-8]
#$response:charset[empty]
#$response:content-type[$.value[text/html]$.charset[$response:charset]]
-#@postprocess[body]
+@postprocess[body]
#$body
#$result[123]
+$body
+
+OK
@main[]
#$a(123)
@@ -102,7 +105,6 @@ $response:charset[windows-1251]
#^if($form:test){y}{n}
#^tablecolumnerror[]
#^roll[]
-#^cookie2[]
#^tableset[]
#^math:PI.format{%.30f}
#^xchildren[]
@@ -156,7 +158,6 @@ $response:charset[windows-1251]
#^fori[]
#^tconnect[]
#^xslt[]
-#^xml[]
#^header[]
#^tablehasht[]
#^datecreatestring[]
@@ -206,7 +207,6 @@ $response:charset[windows-1251]
#^badpos[]
#^processtest[]
#^mail3[]
-#^mail4[]
#^datesaving[]
#^badconstructor[]
#^calendar[]
@@ -220,7 +220,6 @@ $response:charset[windows-1251]
#^cookieexpirestest[]
#^postest[]
#^voidpostest[]
-#^virtualtest[]
#^badcolumntest[]
#^delimiters[]
#^новый-split[]
@@ -237,7 +236,6 @@ $response:charset[windows-1251]
#^mail2[]
#^exec[]
#^passpost[]
-#^menudelim[]
#^fordelim[]
#^duplicatetable2hashkey[]
#^duplicatehashsqlkey[]
@@ -249,21 +247,211 @@ $response:charset[windows-1251]
#^zeroinstdin[]
#^shifts[]
#^jspace[]
-#^user-foreach-test[]
-#^touchittest[]
#^hashselfmodification[]
#^emptyTransformResult[]
#^badxdoccreate[]
#^if(-d "CVS"){y}{n}
-^badjunctioncall[]
+#^badjunctioncall[]
+#^russianindex[]
+#^virtualtest[]
+#^xml[]
+#^mail4[]
+#^voidconstructorpass[]
+#^$form:CLASS.a=$form:CLASS.a
+#^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]
+#^file:fullpath[/abs/a.gif]
+#$form:a/$form:image-map=
+#^foreachform[]
+#^selectSingleoct[]
+#^compilebug[]
+#^badhashcreate[]
+#^badsendmail[]
+#^keygenedhash[]
+#
[$env:HTTP_REFERER]
+#$response:Content-TypE[bad]
+#^emailhead2[]
+#^includet2overridedynamic[]
+^includet2overridestatic[]
+
+@includet2overridedynamic[]
+$derived[^derived::create[]]
+^derived.includet2override[]
+
+@includet2overridestatic[]
+^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[]
+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}[,]
+
+@includet[]
+^include[some.p]
+^included_method[2]
+
+@user-foreach-test[][key;value]
+^user-foreach[key;value]{$key=$value
}
+
+@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[]
OK
+@rusage2[]
+$s[$status:rusage]
+
+^s.tv_sec.format[%.0f].^s.tv_usec.format[%06.0f]
+
+
+@voidconstructorpass[]
+$a[$form:a]
+=^form:a.int(1)=
+=^a.int(1)=
+
+
+@russianindex[]
+#dir with files with russian-lang names
+$where[dir]
+
+$dir[^file:list[$where;\.txt^$]]
+^dir.menu{
+ $dir.name
+}
+
@badjunctioncall[]
^badjunctioncallinside{code}
@badjunctioncallinside[code]
-^code[]
+xx^code[]
@badxdoccreate[]
$xdoc[^xdoc::create[вася]]
@@ -296,19 +484,15 @@ $hash[
}
@touchittest[][i]
+$i[before]
^touchit[]
$i
+@touchittest2[]
+$i[before]
+^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)
@@ -580,7 +764,7 @@ $date.yearday
^mail:send[
$.from[paf@mail.design.ru]
$.to[paf@mail.design.ru]
- $.subject[^taint[uri][москва]=2]
+ $.subject[^taint[uri][москва=E0_+ ]=2]
$.text[^taint[uri][москва]=]
$.html{link}
]
@@ -695,7 +879,9 @@ $sheet[^xdoc::create{
- z
+
+
+z
para1=
@@ -1721,7 +1907,7 @@ $date.year $date.month $date.day
@cookie2[]
#=$cookie:clientType[$.value[test]]=
-=$cookie:clientType=
+=$cookie:CLASS.clientType=
@tableset[]
@@ -2189,7 +2375,7 @@ $xdoc[^xdoc::set{
+$xdoc[^xdoc::create{
@@ -2199,7 +2385,7 @@ $xdoc[^xdoc::set{^process{ПИФ^taint[&]
-}}]
+}]
@xml[]
^xdata[]