1*349cc55cSDimitry Andric //===----------------------------------------------------------------------===// 20b57cec5SDimitry Andric // 30b57cec5SDimitry Andric // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. 40b57cec5SDimitry Andric // See https://llvm.org/LICENSE.txt for license information. 50b57cec5SDimitry Andric // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception 60b57cec5SDimitry Andric // 70b57cec5SDimitry Andric //===----------------------------------------------------------------------===// 80b57cec5SDimitry Andric 90b57cec5SDimitry Andric #include "valarray" 100b57cec5SDimitry Andric 110b57cec5SDimitry Andric _LIBCPP_BEGIN_NAMESPACE_STD 120b57cec5SDimitry Andric 130b57cec5SDimitry Andric // These two symbols are part of the v1 ABI but not part of the >=v2 ABI. 140b57cec5SDimitry Andric #if _LIBCPP_ABI_VERSION == 1 15e40139ffSDimitry Andric template _LIBCPP_FUNC_VIS valarray<size_t>::valarray(size_t); 16e40139ffSDimitry Andric template _LIBCPP_FUNC_VIS valarray<size_t>::~valarray(); 170b57cec5SDimitry Andric #endif 180b57cec5SDimitry Andric 190b57cec5SDimitry Andric template void valarray<size_t>::resize(size_t, size_t); 200b57cec5SDimitry Andric 210b57cec5SDimitry Andric void 220b57cec5SDimitry Andric gslice::__init(size_t __start) 230b57cec5SDimitry Andric { 240b57cec5SDimitry Andric valarray<size_t> __indices(__size_.size()); 250b57cec5SDimitry Andric size_t __k = __size_.size() != 0; 260b57cec5SDimitry Andric for (size_t __i = 0; __i < __size_.size(); ++__i) 270b57cec5SDimitry Andric __k *= __size_[__i]; 280b57cec5SDimitry Andric __1d_.resize(__k); 290b57cec5SDimitry Andric if (__1d_.size()) 300b57cec5SDimitry Andric { 310b57cec5SDimitry Andric __k = 0; 320b57cec5SDimitry Andric __1d_[__k] = __start; 330b57cec5SDimitry Andric while (true) 340b57cec5SDimitry Andric { 350b57cec5SDimitry Andric size_t __i = __indices.size() - 1; 360b57cec5SDimitry Andric while (true) 370b57cec5SDimitry Andric { 380b57cec5SDimitry Andric if (++__indices[__i] < __size_[__i]) 390b57cec5SDimitry Andric { 400b57cec5SDimitry Andric ++__k; 410b57cec5SDimitry Andric __1d_[__k] = __1d_[__k-1] + __stride_[__i]; 420b57cec5SDimitry Andric for (size_t __j = __i + 1; __j != __indices.size(); ++__j) 430b57cec5SDimitry Andric __1d_[__k] -= __stride_[__j] * (__size_[__j] - 1); 440b57cec5SDimitry Andric break; 450b57cec5SDimitry Andric } 460b57cec5SDimitry Andric else 470b57cec5SDimitry Andric { 480b57cec5SDimitry Andric if (__i == 0) 490b57cec5SDimitry Andric return; 500b57cec5SDimitry Andric __indices[__i--] = 0; 510b57cec5SDimitry Andric } 520b57cec5SDimitry Andric } 530b57cec5SDimitry Andric } 540b57cec5SDimitry Andric } 550b57cec5SDimitry Andric } 560b57cec5SDimitry Andric 570b57cec5SDimitry Andric _LIBCPP_END_NAMESPACE_STD 58