re PR fortran/68746 (FAIL: gfortran.dg/read_dir.f90 -O0 execution test)
[official-gcc.git] / libstdc++-v3 / testsuite / 26_numerics / adjacent_difference / 1.cc
blob1b46c1af785c965f42ed599138bfe92fac29bd02
1 // Copyright (C) 2001-2016 Free Software Foundation, Inc.
2 //
3 // This file is part of the GNU ISO C++ Library. This library is free
4 // software; you can redistribute it and/or modify it under the
5 // terms of the GNU General Public License as published by the
6 // Free Software Foundation; either version 3, or (at your option)
7 // any later version.
9 // This library is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 // GNU General Public License for more details.
14 // You should have received a copy of the GNU General Public License along
15 // with this library; see the file COPYING3. If not see
16 // <http://www.gnu.org/licenses/>.
18 // 26.4.4 [lib.adjacent.difference]
20 #include <algorithm>
21 #include <numeric>
22 #include <testsuite_hooks.h>
24 int A[] = {1, 4, 9, 16, 25, 36, 49, 64, 81, 100};
25 int B[] = {1, 3, 5, 7, 9, 11, 13, 15, 17, 19};
26 const int N = sizeof(A) / sizeof(int);
28 void
29 test01()
31 bool test __attribute__((unused)) = true;
33 int D[N];
35 std::adjacent_difference(A, A + N, D);
36 VERIFY( std::equal(D, D + N, B) );
39 int
40 main()
42 test01();
43 return 0;