let intr_pread fd off buf = if off < 0 then invalid_arg "ExtUnix.intr_pread" else unsafe_intr_pread fd off buf