let intr_pwrite fd off buf =
          if off < Int64.zero
          then invalid_arg "ExtUnix.LargeFile.intr_pwrite"
          else unsafe_intr_pwrite fd off buf