Anonymous user
File input/output: Difference between revisions
→{{header|Snabel}}
Line 2,528:
let: q Bin list;
'input.txt' rfile read {{@q $1 push _} when} for
@q 'output.txt' rwfile write
0 $1 &+ for
</lang>
Line 2,540:
'input.txt' rfile read 0 $1 {{
$ @q $1 push _
len
@w &break _for
} when} for
@q +? {@w &_ for} when
</lang>
| |||