external single_write : Unix.file_descr -> buffer -> int =
      "caml_extunixba_single_write"