6 lines · plain
1!RUN: %flang -fsyntax-only -pedantic %s 2>&1 | FileCheck %s2integer, parameter :: j = 103! CHECK: Implied DO index 'j' uses an object of the same name in its bounds expressions4real :: a(10) = [(j, j=1,j)]5end6 1!RUN: %flang -fsyntax-only -pedantic %s 2>&1 | FileCheck %s2integer, parameter :: j = 103! CHECK: Implied DO index 'j' uses an object of the same name in its bounds expressions4real :: a(10) = [(j, j=1,j)]5end6