4 lines
159 B
Text
4 lines
159 B
Text
|
(File newNamed: 'input.txt' &mode: File Read) sessionDo: [| :in |
|
||
|
|
(File newNamed: 'output.txt' &mode: File CreateWrite) sessionDo: [| :out |
|
||
|
|
in >> out]]
|