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}}== |