URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [gomp/] [appendix-a/] [a.17.2.c] - Blame information for rev 816

Details | Compare with Previous | View Log


/* { dg-do compile } */
 
void
a17_2_wrong ()
{
  int x;
  int *i;
  float *r;
  i = &x;
  r = (float *) &x;
#pragma omp parallel
  {
#pragma omp atomic
    *i += 1;
#pragma omp atomic
    *r += 1.0;
/* Incorrect because the atomic constructs reference the same location
     through incompatible types */
  }
}

Line No.	Rev	Author	Line
1	149	jeremybenn	`/* { dg-do compile } */`
2
3			`void`
4			`a17_2_wrong ()`
5			`{`
6			`int x;`
7			`int *i;`
8			`float *r;`
9			`i = &x;`
10			`r = (float *) &x;`
11			`#pragma omp parallel`
12			`{`
13			`#pragma omp atomic`
14			`*i += 1;`
15			`#pragma omp atomic`
16			`*r += 1.0;`
17			`/* Incorrect because the atomic constructs reference the same location`
18			`through incompatible types */`
19			`}`
20			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [gomp/] [appendix-a/] [a.17.2.c] - Blame information for rev 816