--- parser3/www/htdocs/Attic/index.html	2002/08/13 16:27:53	1.107
+++ parser3/www/htdocs/Attic/index.html	2002/09/11 11:11:06	1.133
@@ -5,7 +5,10 @@
 $selffilespec[$filespec]
 #$form:here
 #$request:charset[UTF-8]
-#$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]
@@ -21,12 +24,16 @@ $selffilespec[$filespec]
 #	^int:sql{select news_id from news where news_id=-1}[
 ##	$.default{2}
 #	]<br>
+#    ^hash::sql{bad}
 #    ^string:sql{select news_id from news where news_id=-1}[$.default{2}]
-#	^file::load[text;^string:sql{select '^^hello[]' }]
+#	^file::load[text;^string:sql{select 'from sql server' }]
 #	^string:sql{select '^^hello[]' }] $ORIGINS(1)
 #	^process{	^^h[]}
 #	^process{^string:sql{select '1
 #	^^hello[]' }]	}
+#	^double:sql{select '2*' ^; }
+#$card_sequence_expect_no(^double:sql{select 20020909131047 #card_sequence_expect_no from card_sequence})
+#^card_sequence_expect_no.format[%15.f]
 #}
 #^eval(2)
 #^tcrashlocaljunctionsv2[]
@@ -140,7 +147,6 @@ $selffilespec[$filespec]
 #^tif[]
 #^image[]
 #^mail2[]
-#^cookie[]
 #^response[]
 #^regexp2[]
 #^ttablerem[]
@@ -193,7 +199,6 @@ $selffilespec[$filespec]
 #^tstdin[]
 #^tfind[]
 #^mimet[]
-#^cgit[]
 #^joinlimit[]
 #^tableclonelimit[]
 #^transparams[]
@@ -210,23 +215,143 @@ $selffilespec[$filespec]
 #^xdoctypetest[]
 #^xtabletest[]
 #^staticstest[]
-^staticstest2[]
+#^staticstest2[]
+#^rbodytest[]
+#^cookie[]
+#^cookieexpirestest[]
+#^postest[]
+#^voidpostest[]
+#^virtualtest[]
+#^badcolumntest[]
+#^delimiters[]
+#^новый-split[]
+#^грязные-cookie[]
+#^html-почта[]
+#^badswitchtest[]
+#^okswitchtest[]
+#^cgit[]
+#^ttransformsep[]
+#^calltest[]
+^xpath3[]
 <hr>
 OK
 
+@xpath3[]
+$constr[^xdoc::create{<?xml version="1.0" encoding="$request:charset" standalone="no"?> <constructor-data><object object_type_id="1" template_id="1" data_process_id="1" is_published="1">проверка</object> <block-list> <block name="date" type="0" label="Дата" is_hide_pub="1" data_type="1"/> <block name="content" type="0" label="Текст" is_hide_pub="1" data_type=""/> </block-list></constructor-data>}]
+$objectData[^constr.selectSingle[/constructor-data/object]]
+$objectData.nodeType<br>
+$objectData.firstChild.nodeValue
+
+@calltest[]
+^calltest2[string]
+
+@calltest2[s]
+$s
+
+@ttransformsep[]
+$input[^xdoc::load[20020909131046.xml]]
+$output[^input.transform[generated.xsl]]
+^output.string[]
+
+@okswitchtest[]
+$local[local value]
+^switch[1]{
+	^case[1]{1code $local}
+}
+
+@badswitchtest[]
+^switch[1]{
+	^badswitchtestcase[]
+}
+@badswitchtestcase[][local]
+$local[local value]
+	^case[1]{1code $local}
+
+@badjunction[]
+^badj1[]
+^badj2[]
+
+@html-почта[]
+$переменная[значение]
+^mail:send[
+	$.from[paf@mail]
+	$.to[paf@mail]
+	$.subject[htmltest1]
+	$.html{тест$переменная=  !}
+]
+
+                 
+@грязные-cookie[]
+$cookie:a[&]
+$cookie:a
+
+@новый-split[]
+$abc[a.b.c]
+#$table[^abc.split[.]]
+#$table[^abc.split[.;l]]
+#$table[^abc.split[.;v]]
+$table[^abc.split[.;lv]]
+^table.menu{$table.piece}[,]
+<hr>
+#$table[^abc.split[.;h]]
+$table[^abc.split[.;hr]]
+$table.0,$table.1,$table.2<br>
+
+@delimiters[]
+$a#1[1]<br>
+$a#1=<br>
+
+
+@badcolumntest[]
+$table[^table::load[ext.cfg]]
+$table.b
+
+
+@virtualtest[]
+$derived[^derived::create[derived create actual param]]
+^derived.test[]
+
+
+@voidpostest[]
+$s[]
+^s.pos[$nothing]
+
+@postest[]
+$s[$nothing]
+^s.pos[$nothing]
+
+@cookieexpirestest[]
+#$cookie:exptest[1]
+#$cookie:exptest[$.value[2] $.expires(+1)]
+$response:xxxx[^date::now(+10)]
+$response:yyy[$.value[^date::now(+20)]]
+$response:yyy[$.value[vvv] $.aaaa[^date::now(+20)]]
+
+@rbodytest[]
+$request:body=
+<form method=post>
+<input type=submit name=paf value=123>
+</form>
+
 @staticstest2[]
 ^$derived:derived_var=$derived:derived_var<br>
 ^$derived:a=$derived:a<br>
-#$derived:a[changed] ^$derived:a=$derived:a<br> should be error when there is a
+$derived:a[changed] ^$derived:a=$derived:a<br>
 $derived:derived_var[changed] 
 ^$derived:derived_var=$derived:derived_var<br>
 
-
 @staticstest[]
 $derived[^derived::create[]]
 ^derived.test[]
+<hr>
 ^$derived.a=$derived.a<br>
 ^$derived.x=$derived.x<br>
+<hr>
+^if($derived is derived){derived is derived}{error: derived is not derived}<br>
+^if($derived is table){derived is table}{error:derived is not table}<br>
+<hr>
+^^eval(^$derived)=^eval($derived)<br>
+^^if(^$derived)=^if($derived){y}{n}<br>
 
 
 @xdoctypetest[]
@@ -1782,7 +1907,7 @@ $response:body[^pict.gif[]]
 ]
 
 @cookie[]
-$env:HTTP_COOKIE<br>
+#$env:HTTP_COOKIE<br>
 
 #$cookie:переменная[test тест ТЕСТ2]
 =$cookie:переменная=<br>