--- parser3/www/htdocs/Attic/_bug.html 2004/05/12 10:16:50 1.44
+++ parser3/www/htdocs/Attic/_bug.html 2004/10/07 09:23:44 1.69
@@ -1,9 +1,10 @@
-$str[Mozilla/4.0 (compatible^; MSIE 5.5^; Windows NT 5.0^; .NET CLR 1.1.4322^; .NET CLR 1.0.3705)]
-
-$t[^str.match[yandex][i]]
-
-^if(def $t){
- found
-}{
- not found
-}
\ No newline at end of file
+^connect[oracle://iagency:pwd@oracle]{
+ ^string:sql{select 2*2 from dual}
+ ^try{
+ ^string:sql{select 2*2x from dual}
+ }{
+ $exception.handled(1)
+ exception($exception.comment) handled
+ }
+ ^string:sql{select 2*2 from dual}
+}