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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [libgomp/] [testsuite/] [libgomp.c/] [shared-3.c] - Blame information for rev 280

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


/* { dg-do run } */
 
void abort (void);
 
int main()
{
  int x;
  int *p;
 
  p = &x;
 
  #pragma omp parallel
    {
      if (p != &x)
        abort ();
    }
 
  return 0;
}

Line No.	Rev	Author	Line
1	273	jeremybenn	`/* { dg-do run } */`
2
3			`void abort (void);`
4
5			`int main()`
6			`{`
7			`int x;`
8			`int *p;`
9
10			`p = &x;`
11
12			`#pragma omp parallel`
13			`{`
14			`if (p != &x)`
15			`abort ();`
16			`}`
17
18			`return 0;`
19			`}`

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [libgomp/] [testsuite/] [libgomp.c/] [shared-3.c] - Blame information for rev 280