let
set_binary_io b =
Rep_args
.binary_input := b ;
Rep_args
.binary_output := b