1*7a984708SDavid Chisnall //===------------------------ valarray.cpp --------------------------------===//
2*7a984708SDavid Chisnall //
3*7a984708SDavid Chisnall //                     The LLVM Compiler Infrastructure
4*7a984708SDavid Chisnall //
5*7a984708SDavid Chisnall // This file is dual licensed under the MIT and the University of Illinois Open
6*7a984708SDavid Chisnall // Source Licenses. See LICENSE.TXT for details.
7*7a984708SDavid Chisnall //
8*7a984708SDavid Chisnall //===----------------------------------------------------------------------===//
9*7a984708SDavid Chisnall 
10*7a984708SDavid Chisnall #include "valarray"
11*7a984708SDavid Chisnall 
12*7a984708SDavid Chisnall _LIBCPP_BEGIN_NAMESPACE_STD
13*7a984708SDavid Chisnall 
14*7a984708SDavid Chisnall template valarray<size_t>::valarray(size_t);
15*7a984708SDavid Chisnall template valarray<size_t>::~valarray();
16*7a984708SDavid Chisnall template void valarray<size_t>::resize(size_t, size_t);
17*7a984708SDavid Chisnall 
18*7a984708SDavid Chisnall void
__init(size_t __start)19*7a984708SDavid Chisnall gslice::__init(size_t __start)
20*7a984708SDavid Chisnall {
21*7a984708SDavid Chisnall     valarray<size_t> __indices(__size_.size());
22*7a984708SDavid Chisnall     size_t __k = __size_.size() != 0;
23*7a984708SDavid Chisnall     for (size_t __i = 0; __i < __size_.size(); ++__i)
24*7a984708SDavid Chisnall         __k *= __size_[__i];
25*7a984708SDavid Chisnall     __1d_.resize(__k);
26*7a984708SDavid Chisnall     if (__1d_.size())
27*7a984708SDavid Chisnall     {
28*7a984708SDavid Chisnall         __k = 0;
29*7a984708SDavid Chisnall         __1d_[__k] = __start;
30*7a984708SDavid Chisnall         while (true)
31*7a984708SDavid Chisnall         {
32*7a984708SDavid Chisnall             size_t __i = __indices.size() - 1;
33*7a984708SDavid Chisnall             while (true)
34*7a984708SDavid Chisnall             {
35*7a984708SDavid Chisnall                 if (++__indices[__i] < __size_[__i])
36*7a984708SDavid Chisnall                 {
37*7a984708SDavid Chisnall                     ++__k;
38*7a984708SDavid Chisnall                     __1d_[__k] = __1d_[__k-1] + __stride_[__i];
39*7a984708SDavid Chisnall                     for (size_t __j = __i + 1; __j != __indices.size(); ++__j)
40*7a984708SDavid Chisnall                         __1d_[__k] -= __stride_[__j] * (__size_[__j] - 1);
41*7a984708SDavid Chisnall                     break;
42*7a984708SDavid Chisnall                 }
43*7a984708SDavid Chisnall                 else
44*7a984708SDavid Chisnall                 {
45*7a984708SDavid Chisnall                     if (__i == 0)
46*7a984708SDavid Chisnall                         return;
47*7a984708SDavid Chisnall                     __indices[__i--] = 0;
48*7a984708SDavid Chisnall                 }
49*7a984708SDavid Chisnall             }
50*7a984708SDavid Chisnall         }
51*7a984708SDavid Chisnall     }
52*7a984708SDavid Chisnall }
53*7a984708SDavid Chisnall 
54*7a984708SDavid Chisnall _LIBCPP_END_NAMESPACE_STD
55