let unsafe_fill ({ ar = ar } as ra) ofs len x =
    let last = ofs + len - 1 in
    guarantee_ix ra (max last ra.vlix);
    for i = ofs to last do Impl.unsafe_set ar i x done