--- parser3/www/htdocs/Attic/_bug.html 2005/01/20 14:10:29 1.80 +++ parser3/www/htdocs/Attic/_bug.html 2005/11/22 11:31:58 1.104 @@ -1,29 +1,13 @@ -@main[] -^first[] -^if(def $error){ - ^if(^error.pos[koshmar]>=0){ - $error, TODO:recover - }{ - $error, TODO:die - } +^for[i](1;100){ +
+$original[^for[j](1;$i){$j}] +$original[^file::create[text;original.txt;$original]] +$original.text +
+$encoded[^original.base64[]] +$encoded +
+$decoded[^file::base64[$encoded]] +$decoded.text +^if($decoded.text ne $original.text){^throw[bug;here]} } -@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 - } -} -