--- parser3/src/www/htdocs/Attic/index.html 2001/09/05 08:57:43 1.292
+++ parser3/src/www/htdocs/Attic/index.html 2001/09/18 08:52:49 1.296.2.11
@@ -1,9 +1,23 @@
-@USE
-t.p
-dtf.p
-
@main[]
-^tconnect[]
+^imagepoly[]
+#^dconst[]
+#^subnameinexpr3[]
+#^subnameinexpr2[]
+#^subnameinexpr[]
+#^statictest[]
+#^istable[]
+#^line[]
+#^emptyprotocol[]
+#^emptytableisnotdef[]
+#^autoconvemptystring[]
+#^tdupleform[]
+#^tvoiddefault[]
+#^testdom0[]
+#^testlocal[0]
+#^thashdefault2[]
+#^tcase2[]
+#^tlsplit2[]
+#^tconnect[]
#^timghtmlyu[]
#^timghtml[]
#^tresult[]
@@ -28,9 +42,113 @@ dtf.p
#^tests[]
#^func(0)
+@imagepoly[]
+$i[^image::create[200;200]]
+rem{^i.polyline(0)[^table::set{x y
+50 50
+100 50
+150 150
+}]}
+#^i.line(50;50;100;50;0)
+$response:body[^i.gif[]]
+
+@dconst[]
+$hash[
+$.a(0xe)
+]
+$hash.a
+
+
+@subnameinexpr3[]
+^use[/chart.p]
+$test[^chart::init[1;2;$.zz[]]]
+
+@subnameinexpr2[]
+^use[/test.p]
+$test[^test::subnameinexpr2[]]
+$test.c
+
+@subnameinexpr[]
+$hash[
+ $.a[1]
+ $.b[2]
+]
+$c($CLASS.hash.a+$hash.b)
+$c
+
+@statictest[]
+^use[/test.p]
+$test[^test::create[]]
+
+@istable[]
+^istable_nested[^table::set{hren}]
+@istable_nested[param]
+^if($param is table){y2;n2}
+
+@line[]
+$êàðòèíêà[^image::create(200;200)]
+$êàðòèíêà.line-width(2)
+^êàðòèíêà.line(0;0;$êàðòèíêà.width;$êàðòèíêà.height;0)[**** * ]
+$response:body[^êàðòèíêà.gif[]]
+
+
+@emptyprotocol[]
+^connect[]{zz}
+
+@emptytableisnotdef[]
+$table[^table::set[nameless]{}]
+^if(def $table){y;n}
+
+@autoconvemptystring[]
+^if($form:v){y}{n}
+
+
+@tdupleform[]
+#$form:fields.a
+#$c[^form:tables.a.columns[]]
+#^c.menu{$c.column}[,]
+$atable[$form:tables.a]
+^atable.menu{a=$atable.field}[,]
+
+@tvoiddefault[]
+$var[$form:element]
+^var.int(2)
+
+
+@testdom0[]
+$dom[^dom::load[a.xml]]
+
+
+@testlocal[level][local]
+$local($level)
+before($level):$local
+^if($level<10){
+ ^testlocal($level+1)
+}
+after($level):$local
+
+@thashdefault2[]
+$hash[
+ $.a[1]
+ $.b[2]
+ $._default[xx]
+]
+$hash.c
+
+@tcase2[]
+$hash[
+ $.1{^load[code1]}
+ $.2{code2}
+]
+$hash.1
+
+@tlsplit2[]
+$splitURI[^request:uri.mid(1;^request:uri.length[]-1).lsplit[/]]
+OK
+
@tconnect[]
#^connect[mysql://hren:pwd@hren/zz]{hren}
-^connect[mysql://]{hren}
+^connect[mysql://]{^void:sql{show tables}}
@timghtmlyu[]
@@ -56,8 +174,8 @@ $result[]
^var.int(4)
@ttext[]
-$êàðòèíêà[^image::load[/i/commons_22_prev.gif]]
-^êàðòèíêà.font[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþÿ0123456789-+=!\"%:,.^^^;<>?@()[]'&*/^$;/i/font.gif](5)
+$êàðòèíêà[^image::load[background.gif]]
+^êàðòèíêà.font[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþÿ0123456789-+=!\"%:,.^^^;<>?@()[]'&*/^$;font.gif](5)
^êàðòèíêà.text(10;10)[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijkl]
^êàðòèíêà.text(10;30)[mnopqrstuvwxyzÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞß]