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