1! RUN: not %flang_fc1 -fsyntax-only %s 2>&1 | FileCheck %s2! CHECK: error: expected ':'3! CHECK: in the context: loop control4do concurrent(I = 1, N)5end do6end7