Stream と cat コマンド：Rainy Day Codings：So-net blog

「ふつうの Haskell」を買ったので OCaml の実用レッスンをするのにちょうどよさそうな問題をこの中から探して OCaml に書き換えて実装してみようと思う。 まずは cat コマンド。といっても標準入力から読んで標準出力へ出すだけの簡易版。Ocaml だとこんな感じだろうか。 let _ = let stdinstr = Stream.of_channel stdin in Stream.iter print_char stdinstr ;; Stream.of_channel は入力チャネルからストリームを作って文字の列のストリームを作る。 stdin から作ったその入力ストリームの1文字1文字に対して print_char を適用するので標準入力から標準出力へ1文字ずつ流すということになるわけだ。 実際のプログラミングでは行単位で処理を行うことが多いだろう。行単位のストリーム