URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [gomp/] [block-1.f90] - Blame information for rev 302

Details | Compare with Previous | View Log


! { dg-do compile }
 
!$omp parallel
!$omp critical
       goto 10          ! { dg-error "invalid (exit|branch)" }
!$omp end critical
 10    x = 1
!$omp end parallel
 
       end

Line No.	Rev	Author	Line
1	302	jeremybenn	`! { dg-do compile }`
2
3			`!$omp parallel`
4			`!$omp critical`
5			`goto 10 ! { dg-error "invalid (exit\|branch)" }`
6			`!$omp end critical`
7			`10 x = 1`
8			`!$omp end parallel`
9
10			`end`

Browse

Tools

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [gomp/] [block-1.f90] - Blame information for rev 302