maxjhandsome
/
llvm-project
forked from OSchip/llvm-project
1
0
Fork 0
Code Issues Pull Requests Packages Releases Wiki Activity
llvm-project/flang/test/Semantics/omp-parallell01.f90

Ignoring revisions in .git-blame-ignore-revs. Click here to bypass and see the normal blame view.

24 lines
427 B
Fortran
Raw Normal View History

[flang] [OpenMP 4.5] Adding lit test cases for OpenMP Constructs. 1. Section 2.5 : Parallel Construct 2. Section 2.7.1 : Loop Construct 3. Section 2.7.2 : Sections Construct 4. Section 2.7.3 : Single Construct 5. Section 2.7.4 : Workshare Construct 6. Section 2.8.1 : Simd Construct 7. Section 2.8.3 : Loop Simd Construct 8. Section 2.9.1 : Task Construct 9. Section 2.9.2 : Taskloop Construct 10. Section 2.9.3 : Taskloop Simd Construct Most of the test cases added as part of this change contains semantic errors except few cases which are semantically correct but thrown a semantic error. Currently flang is not throwing the errors for these cases and throwing semantic errors for the following correct test cases {omp-do03.f90 , omp-loop-simd01.f90 , omp-simd02.f90 , omp-taskloop01.f90} Hence, all the test cases are marked as XFAIL. Reviewed By: DavidTruby Differential Revision: https://reviews.llvm.org/D87908
2020-09-24 20:08:11 +08:00
! RUN: %S/test_errors.sh %s %t %f18 -fopenmp
! OpenMP Version 4.5
! 2.5 parallel construct.
! A program that branches into or out of a parallel region
! is non-conforming.
program omp_parallel
integer i, j, k
!$omp parallel
do i = 1, 10
do j = 1, 10
print *, "Hello"
[Flang][openmp][openacc] Extend CheckNoBranching to handle branching provided by LabelEnforce. `CheckNoBranching` is currently handling only illegal branching out for constructs with `Parser::Name` in them. Extend the same for handling illegal branching out caused by `Parser::Label` based statements. This patch could possibly solve one of the issues(typically branching out) mentioned in D92735. Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D93447
2020-12-17 16:58:03 +08:00
!ERROR: Control flow escapes from PARALLEL
[flang] [OpenMP 4.5] Adding lit test cases for OpenMP Constructs. 1. Section 2.5 : Parallel Construct 2. Section 2.7.1 : Loop Construct 3. Section 2.7.2 : Sections Construct 4. Section 2.7.3 : Single Construct 5. Section 2.7.4 : Workshare Construct 6. Section 2.8.1 : Simd Construct 7. Section 2.8.3 : Loop Simd Construct 8. Section 2.9.1 : Task Construct 9. Section 2.9.2 : Taskloop Construct 10. Section 2.9.3 : Taskloop Simd Construct Most of the test cases added as part of this change contains semantic errors except few cases which are semantically correct but thrown a semantic error. Currently flang is not throwing the errors for these cases and throwing semantic errors for the following correct test cases {omp-do03.f90 , omp-loop-simd01.f90 , omp-simd02.f90 , omp-taskloop01.f90} Hence, all the test cases are marked as XFAIL. Reviewed By: DavidTruby Differential Revision: https://reviews.llvm.org/D87908
2020-09-24 20:08:11 +08:00
goto 10
end do
end do
!$omp end parallel
10 stop
end program omp_parallel