--- parser3/www/htdocs/Attic/_bug.html 2004/07/28 13:43:58 1.58
+++ parser3/www/htdocs/Attic/_bug.html 2004/10/07 09:23:44 1.69
@@ -1,30 +1,10 @@
-$t[^table::create{c
-515
-516
-517
-518
-519
-520
-521
-522
-523
-501
-502
-506
-507
-508
-509à,
-509
-509
-510
-511
-512
-513/513à
-}]
-
-#^throw[paf;
-^t.menu{
- $t.c -- ^t.c.int(0)
-
+^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}
}
-#]
\ No newline at end of file