let intr_pread fd off buf ofs len = if (off < 0) || ((ofs < 0) || ((len < 0) || (ofs > ((String.length buf) - len)))) then invalid_arg "ExtUnix.intr_pread" else unsafe_intr_pread fd off buf ofs len