Copy stdin to stdout: Difference between revisions

Content added Content deleted
Line 364: Line 364:
copyFile(IN, OUT);
copyFile(IN, OUT);
end func;</lang>
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}}==
=={{header|Symsyn}}==