From eda9b08c1d83fcdc69c51f51b91a653c33745503 Mon Sep 17 00:00:00 2001 From: Simon Cruanes Date: Tue, 16 Dec 2014 23:09:07 +0100 Subject: [PATCH] update doc --- core/CCIO.mli | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/core/CCIO.mli b/core/CCIO.mli index 73c1529e..4ff88511 100644 --- a/core/CCIO.mli +++ b/core/CCIO.mli @@ -47,9 +47,10 @@ Examples: # CCIO.( with_in "/tmp/input" (fun ic -> - with_out ~flags:[Open_creat] ~mode:0o644 "/tmp/output" + let chunks = read_chunks ic in + with_out ~flags:[Open_creat; Open_wronly] ~mode:0o644 "/tmp/output" (fun oc -> - Seq.chunks 512 ic |> Seq.to_output oc + write_gen oc chunks ) ) ) ;;