50 lines · cpp
1//===----------------------------------------------------------------------===//2//3// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.4// See https://llvm.org/LICENSE.txt for license information.5// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception6//7//===----------------------------------------------------------------------===//8 9#include <valarray>10 11_LIBCPP_BEGIN_NAMESPACE_STD12 13// These two symbols are part of the v1 ABI but not part of the >=v2 ABI.14#if _LIBCPP_ABI_VERSION == 115template _LIBCPP_EXPORTED_FROM_ABI valarray<size_t>::valarray(size_t);16template _LIBCPP_EXPORTED_FROM_ABI valarray<size_t>::~valarray();17#endif18 19template void valarray<size_t>::resize(size_t, size_t);20 21void gslice::__init(size_t __start) {22 valarray<size_t> __indices(__size_.size());23 size_t __k = __size_.size() != 0;24 for (size_t __i = 0; __i < __size_.size(); ++__i)25 __k *= __size_[__i];26 __1d_.resize(__k);27 if (__1d_.size()) {28 __k = 0;29 __1d_[__k] = __start;30 while (true) {31 size_t __i = __indices.size() - 1;32 while (true) {33 if (++__indices[__i] < __size_[__i]) {34 ++__k;35 __1d_[__k] = __1d_[__k - 1] + __stride_[__i];36 for (size_t __j = __i + 1; __j != __indices.size(); ++__j)37 __1d_[__k] -= __stride_[__j] * (__size_[__j] - 1);38 break;39 } else {40 if (__i == 0)41 return;42 __indices[__i--] = 0;43 }44 }45 }46 }47}48 49_LIBCPP_END_NAMESPACE_STD50