|
|
| version 1.66, 2004/09/13 08:56:47 | version 1.102, 2005/11/22 11:12:40 |
|---|---|
| Line 1 | Line 1 |
| $hf[^hashfile::open[hf]] | |
| $hf.key[] | |
| OK | |
| ^for[i](1;200){ | |
| <hr> | |
| $original[^for[j](1;$i){$j}] | |
| $original | |
| <br> | |
| $encoded[^string:base64[$original]] | |
| $encoded | |
| <br> | |
| $decoded[^encoded.base64[]] | |
| $decoded | |
| ^if($decoded ne $original){^throw[bug;here]} | |
| } |