--- parser3/www/htdocs/Attic/_bug.html 2004/12/23 14:40:54 1.73 +++ parser3/www/htdocs/Attic/_bug.html 2005/11/22 11:21:35 1.103 @@ -1,25 +1,12 @@ -@main[] - -$cH[^cH[]] - -^if($cH.this is "junction"){ - $result[^cH.this[$cH.th_par]] -}{ - $result[0] +^for[i](1;200){ +
+$original[^for[j](1;$i){$j}] +$original +
+$encoded[^original.base64[]] +$encoded +
+$decoded[^string:base64[$encoded]] +$decoded +^if($decoded ne $original){^throw[bug;here]} } - -#################################################################################################################### - -@cH[] -$result[ - $.this[$mThis] - $.th_par[ - $.a(2) - $.b(3) - ] -] -#################################################################################################################### - -@mThis[lparams][params] -$params[^hash::create[$lparams]] -$result[^eval($params.a * $params.b)]