--- parser3/www/htdocs/Attic/_bug.html 2005/01/20 14:10:29 1.80 +++ parser3/www/htdocs/Attic/_bug.html 2005/07/27 10:39:40 1.90.2.2 @@ -1,29 +1,8 @@ -@main[] -^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 - } -} +@USE +/_bug_derived.p +@main[] +$bug[^bug_derived::create[before set]] +$bug.paf
+$bug.paf[works] +$bug.paf!! \ No newline at end of file