let make_writer ~write  ~error = {
  w_write = write;
  w_error = error;
}