Mercurial > hg > CbC > CbC_gcc

view libgomp/testsuite/libgomp.c/pr43893.c @ 63:b7f97abdc517 gcc-4.6-20100522

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
update gcc from gcc-4.5.0 to gcc-4.6
author ryoma <e075725@ie.u-ryukyu.ac.jp>
date Mon, 24 May 2010 12:47:05 +0900
parents
children
line wrap: on
line source

/* PR c/43893 */
/* { dg-do run } */

extern void abort (void);

int
main ()
{
  int c;
  unsigned int i;
  int j;
  c = 0;
#pragma omp parallel for reduction(+:c)
  for (i = 0; i < 1; i++)
    c++;
  if (c != 1)
    abort ();
  c = 0;
#pragma omp parallel for reduction(+:c)
  for (i = 0; i <= 0; i++)
    c++;
  if (c != 1)
    abort ();
  c = 0;
#pragma omp parallel for reduction(+:c)
  for (j = - __INT_MAX__ - 1; j < - __INT_MAX__; j++)
    c++;
  if (c != 1)
    abort ();
  c = 0;
#pragma omp parallel for reduction(+:c)
  for (j = - __INT_MAX__ - 1; j <= - __INT_MAX__ - 1; j++)
    c++;
  if (c != 1)
    abort ();
  c = 0;
#pragma omp parallel for reduction(+:c)
  for (i = 2U * __INT_MAX__ + 1; i > 2U * __INT_MAX__; i--)
    c++;
  if (c != 1)
    abort ();
  c = 0;
#pragma omp parallel for reduction(+:c)
  for (i = 2U * __INT_MAX__ + 1; i >= 2U * __INT_MAX__ + 1; i--)
    c++;
  if (c != 1)
    abort ();
  c = 0;
#pragma omp parallel for reduction(+:c)
  for (j = __INT_MAX__; j > __INT_MAX__ - 1; j--)
    c++;
  if (c != 1)
    abort ();
  c = 0;
#pragma omp parallel for reduction(+:c)
  for (j = __INT_MAX__; j >= __INT_MAX__; j--)
    c++;
  if (c != 1)
    abort ();
  return 0;
}