Copy stdin to stdout: Difference between revisions
Content added Content deleted
(add brainf****) |
Not a robot (talk | contribs) (Add CLU) |
||
| Line 141: | Line 141: | ||
std::cout << std::cin.rdbuf(); |
std::cout << std::cin.rdbuf(); |
||
}</lang> |
}</lang> |
||
=={{header|CLU}}== |
|||
<lang clu>start_up = proc () |
|||
pi: stream := stream$primary_input() |
|||
po: stream := stream$primary_output() |
|||
while true do |
|||
stream$putc(po, stream$getc(pi)) |
|||
end except when end_of_file: |
|||
return |
|||
end |
|||
end start_up</lang> |
|||
=={{header|Commodore BASIC}}== |
=={{header|Commodore BASIC}}== |
||
| Line 248: | Line 260: | ||
█ |
█ |
||
</pre> |
</pre> |
||
=={{header|Common Lisp}}== |
=={{header|Common Lisp}}== |
||