--- parser3/www/htdocs/Attic/_bug.html 2004/10/07 09:23:44 1.69
+++ parser3/www/htdocs/Attic/_bug.html 2005/07/29 06:17:38 1.92
@@ -1,10 +1,10 @@
-^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}
-}
+@USE
+/_bug_derived.p
+#/_bug.p
+
+@main[]
+$bug[^bug_derived::create[value from ctor]]
+read:$bug.paf
+write:$bug.paf[works]
+read:$bug.paf
+