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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [gomp/] [appendix-a/] [a.17.1.c] - Blame information for rev 749

Go to most recent revision | Details | Compare with Previous | View Log


/* { dg-do compile } */
 
void
a17_1_wrong ()
{
  union
  {
    int n;
    float x;
  } u;
#pragma omp parallel
  {
#pragma omp atomic
    u.n++;
#pragma omp atomic
    u.x += 1.0;
/* Incorrect because the atomic constructs reference the same location
     through incompatible types */
  }
}

Line No.	Rev	Author	Line
1	689	jeremybenn	`/* { dg-do compile } */`
2
3			`void`
4			`a17_1_wrong ()`
5			`{`
6			`union`
7			`{`
8			`int n;`
9			`float x;`
10			`} u;`
11			`#pragma omp parallel`
12			`{`
13			`#pragma omp atomic`
14			`u.n++;`
15			`#pragma omp atomic`
16			`u.x += 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-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [gomp/] [appendix-a/] [a.17.1.c] - Blame information for rev 749