libstdc++-v3/testsuite/performance/26_numerics/valarray_gslice_to_index.cc

   1 // Copyright (C) 2006-2019 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
  19 #include <valarray>
  20 #include <testsuite_performance.h>
  21
  22 int main()
  23 {
  24   using namespace std;
  25   using namespace __gnu_test;
  26
  27   time_counter time;
  28   resource_counter resource;
  29
  30   valarray<double> va(1000000);
  31
  32   for (int i = 0; i < 1000000; ++i)
  33     va[i] = i;
  34
  35   size_t lengthvalues[] = { 10, 10, 10, 10, 10, 10 };
  36   size_t stridevalues[] = { 1, 1, 1, 1, 1, 1 };
  37
  38   valarray<size_t> lengths(lengthvalues, 6);
  39   valarray<size_t> stride(stridevalues, 6);
  40
  41   start_counters(time, resource);
  42   for (int j = 0; j < 1000; ++j)
  43     va[gslice(0, lengths, stride)];
  44   stop_counters(time, resource);
  45   report_performance(__FILE__, "", time, resource);
  46
  47   return 0;
  48 }