Skip to content

Commit 04a4c55

Browse files
committed
Added an XFAIL test case for critical construct name collision
1 parent 7008421 commit 04a4c55

File tree

1 file changed

+18
-0
lines changed

1 file changed

+18
-0
lines changed

flang/test/Semantics/critical05.f90

+18
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,18 @@
1+
! RUN: %python %S/test_symbols.py %s %flang_fc1 -fopenmp
2+
! XFAIL: *
3+
!Checking for name collision of a critical construct with other elements of a program
4+
5+
!DEF: /check_symbols MainProgram
6+
program check_symbols
7+
!DEF: /check_symbols/i ObjectEntity INTEGER(4)
8+
integer i, bar
9+
!REF: /check_symbols/i
10+
foo: do i = 1, 10
11+
end do foo
12+
13+
!$omp critical (foo)
14+
!$omp end critical (foo)
15+
16+
!$omp critical (bar)
17+
!$omp end critical (bar)
18+
end program check_symbols

0 commit comments

Comments
 (0)