--- parser3/www/htdocs/Attic/_bug.html 2004/12/23 15:36:12 1.76 +++ parser3/www/htdocs/Attic/_bug.html 2005/11/22 11:38:44 1.84.4.13 @@ -1,8 +1,13 @@ -^connect[$SQL.connect-string]{ - $f[^file::sql{select 2*2, 'this is name.doc', 'app/paf'}[ -# $.name[that is name.zip] - $.content-type[app/pif] - ]] - $f.name - $f.content-type -} \ No newline at end of file +^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]} +}