|
|
| version 1.104, 2005/11/22 11:31:58 | version 1.110, 2005/11/25 11:54:42 |
|---|---|
| Line 1 | Line 1 |
| ^for[i](1;100){ | $i(0) |
| <hr> | ^while($i<10){^i.inc[]$i}{,} |
| $original[^for[j](1;$i){$j}] | |
| $original[^file::create[text;original.txt;$original]] | |
| $original.text | |
| <br> | |
| $encoded[^original.base64[]] | |
| $encoded | |
| <br> | |
| $decoded[^file::base64[$encoded]] | |
| $decoded.text | |
| ^if($decoded.text ne $original.text){^throw[bug;here]} | |
| } |