Anonymous user
Copy stdin to stdout: Difference between revisions
→{{header|Seed7}}
Line 364:
copyFile(IN, OUT);
end func;</lang>
=={{header|Seed7}}==
<lang smalltalk>"using Stream class's bulk copy method:"
<br>Stdin copyToEndInto:Stdout.
"line wise"
<br>[Stdin atEnd] whileFalse:[ Stdout nextPutLine:(Stdin nextLine) ].
"character wise"
[Stdin atEnd] whileFalse:[ Stdout nextPut:(Stdin next) ].
"no EOF test, but handle EOF Exception"
[
[ Stdout nextPut:(Stdin next) ] loop.
] on: StreamError do:[]
=={{header|Symsyn}}==
| |||