Anonymous user
Copy stdin to stdout: Difference between revisions
no edit summary
No edit summary |
No edit summary |
||
Line 142:
call charin , x /*read a char from the input stream. */
call charout , x /*write " " " " output " */
end /*while*/ /*stick a fork in it, we're all done. */</lang
=={{Header|Scheme}}==
| |||