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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gfortran.dg/] [gomp/] [pr29759.f90] - Blame information for rev 844

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

Line No. Rev Author Line
1 149 jeremybenn
! PR fortran/29759
2
! { dg-do compile }
3
 
4
PROGRAM test_omp
5
!$OMP PARALLEL &
6
!$OMP NUM_THREADS(2)
7
!$OMP END PARALLEL
8
 
9
!$OMP PARALLEL &
10
!$OMP & NUM_THREADS(2)
11
!$OMP END PARALLEL
12
 
13
!$OMP PARALLEL &
14
!
15
!$OMP NUM_THREADS(2)
16
!$OMP END PARALLEL
17
 
18
!$OMP PARALLEL &
19
!
20
!$OMP & NUM_THREADS(2)
21
!$OMP END PARALLEL
22
 
23
 
24
!$OMP PARALLEL &                ! { dg-error "Unclassifiable OpenMP" }
25
!$    NUM_THREADS(2)            ! { dg-error "Unclassifiable" }
26
!$OMP END PARALLEL              ! { dg-error "Unexpected" }
27
 
28
!$OMP PARALLEL &                ! { dg-error "Unclassifiable OpenMP" }
29
!$    & NUM_THREADS(2)          ! { dg-error "Unclassifiable" }
30
!$OMP END PARALLEL              ! { dg-error "Unexpected" }
31
 
32
!$OMP PARALLEL &                ! { dg-error "Unclassifiable OpenMP" }
33
!
34
!$    NUM_THREADS(2)            ! { dg-error "Unclassifiable" }
35
!$OMP END PARALLEL              ! { dg-error "Unexpected" }
36
 
37
!$OMP PARALLEL &                ! { dg-error "Unclassifiable OpenMP" }
38
!
39
!$    & NUM_THREADS(2)          ! { dg-error "Unclassifiable" }
40
!$OMP END PARALLEL              ! { dg-error "Unexpected" }
41
 
42
END PROGRAM

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.