--- /dev/null
+// Copyright (C) 2001 Free Software Foundation, Inc.
+//
+// This file is part of the GNU ISO C++ Library. This library is free
+// software; you can redistribute it and/or modify it under the
+// terms of the GNU General Public License as published by the
+// Free Software Foundation; either version 2, or (at your option)
+// any later version.
+
+// This library is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+// GNU General Public License for more details.
+
+// You should have received a copy of the GNU General Public License along
+// with this library; see the file COPYING. If not, write to the Free
+// Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
+// USA.
+
+// 25.2.11 random_shuffle()
+
+#include <algorithm>
+#include <testsuite_hooks.h>
+
+bool test __attribute__((unused)) = true;
+
+const int N = 200000;
+int A[N], s1[N];
+
+#if _GLIBCXX_PARALLEL
+#define TAG , __gnu_parallel::sequential_tag()
+#else
+#define TAG
+#endif
+
+void fill_ascending()
+{
+ for (int i = 0; i < N; ++i)
+ A[i] = i;
+}
+
+void
+test01()
+{
+ fill_ascending();
+#if _GLIBCXX_PARALLEL
+ for (int num_threads = 1; num_threads <= 2; ++num_threads)
+ {
+ omp_set_num_threads(num_threads);
+#endif
+ std::copy(A, A + N, s1);
+ VERIFY(std::equal(s1, s1 + N, A TAG));
+
+ std::random_shuffle(s1, s1 + N);
+ // the chance that random_shuffle leaves the order as is by coincidence
+ // is negligible, so we expect it to be permuted
+ VERIFY(!std::equal(s1, s1 + N, A TAG));
+
+ std::sort(s1, s1 + N TAG);
+ VERIFY(std::equal(s1, s1 + N, A TAG));
+#if _GLIBCXX_PARALLEL
+ }
+#endif
+}
+
+int
+main()
+{
+#if _GLIBCXX_PARALLEL
+ __gnu_parallel::_Settings gpms = __gnu_parallel::_Settings::get();
+ gpms.algorithm_strategy = __gnu_parallel::force_parallel;
+ __gnu_parallel::_Settings::set(gpms);
+#endif
+ test01();
+ return 0;
+}