xref: /llvm-project/flang/test/Semantics/OpenMP/omp-do-collapse1.f90 (revision 502bea25bdc07d1811b8bfea1c2e6bfa8617f72f)
1*7d7633bdSKiran Chandramohan! RUN: not %flang_fc1 -fdebug-unparse-with-symbols -fopenmp %s 2>&1 | FileCheck %s
2*7d7633bdSKiran Chandramohan! OpenMP Version 4.5
3*7d7633bdSKiran Chandramohan! 2.7.1 Loop Construct
4*7d7633bdSKiran Chandramohanprogram omp_doCollapse
5*7d7633bdSKiran Chandramohan  integer:: i
6*7d7633bdSKiran Chandramohan  !$omp parallel do collapse(2)
7*7d7633bdSKiran Chandramohan    do i = 1, 3
8*7d7633bdSKiran Chandramohan      !CHECK: Loop control is not present in the DO LOOP
9*7d7633bdSKiran Chandramohan      !CHECK: associated with the enclosing LOOP construct
10*7d7633bdSKiran Chandramohan      do
11*7d7633bdSKiran Chandramohan      end do
12*7d7633bdSKiran Chandramohan    end do
13*7d7633bdSKiran Chandramohanend program omp_doCollapse
14*7d7633bdSKiran Chandramohan
15