summaryrefslogtreecommitdiff
path: root/flang/test/Semantics/critical02.f90
diff options
context:
space:
mode:
Diffstat (limited to 'flang/test/Semantics/critical02.f90')
-rw-r--r--flang/test/Semantics/critical02.f902
1 files changed, 1 insertions, 1 deletions
diff --git a/flang/test/Semantics/critical02.f90 b/flang/test/Semantics/critical02.f90
index e1c9bb3e0ff1..10581f9fd805 100644
--- a/flang/test/Semantics/critical02.f90
+++ b/flang/test/Semantics/critical02.f90
@@ -61,7 +61,7 @@ end subroutine test6
subroutine test7()
use iso_fortran_env
- type(event_type) :: x[*], y[*]
+ type(event_type) :: x, y
critical
!ERROR: An image control statement is not allowed in a CRITICAL construct
event post (x)