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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [gomp/] [pr44036-1.f90] - Diff between revs 302 and 378

Rev 302	Rev 378
Line 10...	Line 10...
`x = 6`	`x = 6`
`!$omp parallel default(none) private (x)`	`!$omp parallel default(none) private (x)`
`x = a(4)`	`x = a(4)`
`!$omp end parallel`	`!$omp end parallel`
`!$omp parallel default(none) private (x) ! { dg-error "enclosing parallel" }`	`!$omp parallel default(none) private (x) ! { dg-error "enclosing parallel" }`
`x = b(5) ! { dg-error "not specified in" "" { target --* } 11 }`	`x = b(5) ! { dg-error "not specified in" }`
`!$omp end parallel`	`!$omp end parallel`
`!$omp parallel default(none) private (x)`	`!$omp parallel default(none) private (x)`
`x = c(6)`	`x = c(6)`
`!$omp end parallel`	`!$omp end parallel`
`d => a`	`d => a`