--- 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 + } +} +