--- parser3/www/htdocs/Attic/_bug.html	2004/02/26 14:37:31	1.11
+++ parser3/www/htdocs/Attic/_bug.html	2004/10/07 09:23:44	1.69
@@ -1,6 +1,10 @@
-@main[]
-$file[^file::load[text;_bug.p]]
-^process[$self]{$file.text}[
-	$.file[$file.name]
-	$.lineno(-1)
-]
+^connect[oracle://iagency:pwd@oracle]{
+	^string:sql{select 2*2 from dual}<br>
+	^try{
+		^string:sql{select 2*2x from dual}
+	}{
+		$exception.handled(1)
+		exception($exception.comment) handled<br>
+	}
+	^string:sql{select 2*2 from dual}<br>
+}