libstdc++-v3/testsuite/25_algorithms/random_shuffle/1.cc

   1 // Copyright (C) 2001-2013 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.
   8
   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.
  13
  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/>.
  17
  18 // 25.2.11 random_shuffle()
  19
  20 #include <algorithm>
  21 #include <testsuite_hooks.h>
  22
  23 bool test __attribute__((unused)) = true;
  24
  25 const int N = 200000;
  26 int A[N], s1[N];
  27
  28 #if _GLIBCXX_PARALLEL
  29 #define TAG , __gnu_parallel::sequential_tag()
  30 #else
  31 #define TAG
  32 #endif
  33
  34 void fill_ascending()
  35 {
  36   for (int i = 0; i < N; ++i)
  37     A[i] = i;
  38 }
  39
  40 void
  41 test01()
  42 {
  43   fill_ascending();
  44 #if _GLIBCXX_PARALLEL
  45   for (int num_threads = 1; num_threads <= 2; ++num_threads)
  46   {
  47     omp_set_num_threads(num_threads);
  48 #endif
  49     std::copy(A, A + N, s1);
  50     VERIFY(std::equal(s1, s1 + N, A TAG));
  51
  52     std::random_shuffle(s1, s1 + N);
  53     // the chance that random_shuffle leaves the order as is by coincidence
  54     // is negligible, so we expect it to be permuted
  55     VERIFY(!std::equal(s1, s1 + N, A TAG));
  56
  57     std::sort(s1, s1 + N TAG);
  58     VERIFY(std::equal(s1, s1 + N, A TAG));
  59 #if _GLIBCXX_PARALLEL
  60   }
  61 #endif
  62 }
  63
  64 int
  65 main()
  66 {
  67 #if _GLIBCXX_PARALLEL
  68   __gnu_parallel::_Settings gpms = __gnu_parallel::_Settings::get();
  69   gpms.algorithm_strategy = __gnu_parallel::force_parallel;
  70   __gnu_parallel::_Settings::set(gpms);
  71 #endif
  72   test01();
  73   return 0;
  74 }