[gpderetta]

But what about ~buf here:

  let len = Core.In_channel.input in_ch ~buf ~pos:0 ~len:buf_size

[test9753]

~buf is shorthand for ~buf:buf

[gpderetta]

Oh, nice.