--- parser3/www/htdocs/Attic/_bug.html 2005/11/16 14:18:06 1.84.4.7 +++ parser3/www/htdocs/Attic/_bug.html 2005/11/22 11:38:44 1.84.4.13 @@ -1,41 +1,13 @@ -@opt[] -$result[ - $.encloser["] -# $.separator[^#09] -] - -@main[] -$filename[/t.cfg] -$options2[ - $.encloser["] -# $.separator[^#09] -] - -$t1[^table::create{a b -1 " -2 "" -3 """}] - -^t1.save[$filename][$options2] - -# if we try load with $options - we receive error -$t2[^table::load[$filename][$options2]] -#$t2[^table::load[$filename][^opt[]]] -#$t2[^table::load[$filename][$.encloser["]]] - - - - - - - - -^t1.menu{ - - - - - - ^t2.offset(1) +^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]} } -
t1t2eq?
$t1.b$t2.b^if($t1.b eq $t2.b){YES}{NO}