--- parser3/www/htdocs/Attic/_bug.html 2005/08/08 08:41:52 1.93 +++ parser3/www/htdocs/Attic/_bug.html 2005/11/22 11:12:40 1.102 @@ -1,11 +1,12 @@ -@USE -/_bug_derived.p -/_bug.p - -@main[] -$bug[^bug_derived::create[value from ctor]] -read:$bug.paf
-write:$bug.paf[works]
-read:$bug.paf
- -^taint[uri]["|&] +^for[i](1;200){ +
+$original[^for[j](1;$i){$j}] +$original +
+$encoded[^string:base64[$original]] +$encoded +
+$decoded[^encoded.base64[]] +$decoded +^if($decoded ne $original){^throw[bug;here]} +}