Mercurial > hg > CbC > CbC_gcc
view libgomp/testsuite/libgomp.c/autopar-1.c @ 0:a06113de4d67
first commit
author | kent <kent@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Fri, 17 Jul 2009 14:47:48 +0900 |
parents | |
children | 04ced10e8804 |
line wrap: on
line source
/* { dg-do run } */ /* { dg-options "-ftree-parallelize-loops=4 -O2 -ffast-math" } */ extern void abort (void); double d[1024], e[1024]; int f[1024], g[1024]; double __attribute__((noinline)) foo (void) { double s = 0.0; int i; for (i = 0; i < 1024; i++) s += d[i] - e[i]; return s; } int __attribute__((noinline)) bar (void) { int s = 0, i; for (i = 0; i < 1024; i++) s += f[i] - g[i]; return s; } int main (void) { int i; for (i = 0; i < 1024; i++) { d[i] = i * 2; e[i] = i; f[i] = i * 2; g[i] = i; } if (foo () != 1023 * 1024 / 2) abort (); if (bar () != 1023 * 1024 / 2) abort (); return 0; }