--- parser3/www/htdocs/Attic/_bug.html 2004/02/26 14:37:31 1.11
+++ parser3/www/htdocs/Attic/_bug.html 2005/01/20 14:10:29 1.80
@@ -1,6 +1,29 @@
@main[]
-$file[^file::load[text;_bug.p]]
-^process[$self]{$file.text}[
- $.file[$file.name]
- $.lineno(-1)
-]
+^first[]
+^if(def $error){
+ ^if(^error.pos[koshmar]>=0){
+ $error, TODO:recover
+ }{
+ $error, TODO:die
+ }
+}
+@first[]
+^second[]
+^if(!def $error){
+ working1
+}
+@second[]
+^if(^math:random(2)){
+ $error[koshmar,test1]
+}
+^if(!def $error){
+ working2
+
+ ^if(^math:random(2)){
+ $error[uzhas,test2]
+ }
+ ^if(!def $error){
+ working3
+ }
+}
+