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