let intr_pwrite fd off buf =
      if off < 0
      then invalid_arg "ExtUnix.intr_pwrite"
      else unsafe_intr_pwrite fd off buf