void check_ext_v( VectorT vec, IndexObj const& obj) { typedef typename VectorT::block_type block_type; typedef typename VectorT::value_type value_type; typedef typename get_block_layout<block_type>::layout_type LP; vsip::dda::Data<block_type, vsip::dda::in> data(vec.block()); value_type* ptr = data.ptr(); stride_type stride = data.stride(0); length_type size = data.size(0); for (index_type p=0; p<size; ++p) { test_assert(*ptr == obj(p)); ptr += stride; } }