URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [fast-math-vect-reduc-7.c] - Rev 816
Compare with Previous | Blame | View Log
/* { dg-require-effective-target vect_double } */ /* need -funsafe-math-optimizations to vectorize the summation. also need -ffinite-math-only to create the min/max expr. */ #include <stdarg.h> #include "tree-vect.h" #define N 16 #define DIFF 242 int main1 (double x, double max_result) { int i; double b[N] = {0,3,6,9,12,15,18,21,24,27,30,33,36,39,42,45}; double c[N] = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15}; double diff = 2; double max = x; double min = 10; for (i = 0; i < N; i++) { diff += (b[i] - c[i]); } for (i = 0; i < N; i++) { max = max < c[i] ? c[i] : max; } for (i = 0; i < N; i++) { min = min > c[i] ? c[i] : min; } /* check results: */ if (diff != DIFF) abort (); if (max != max_result) abort (); if (min != 0) abort (); return 0; } int main (void) { check_vect (); main1 (100, 100); main1 (0, 15); return 0; } /* { dg-final { scan-tree-dump-times "vectorized 3 loops" 1 "vect" } } */ /* { dg-final { cleanup-tree-dump "vect" } } */