13 lines · plain
1! RUN: %python %S/test_errors.py %s %flang_fc12module m3 contains4 subroutine s15 !ERROR: DATA statement initializations affect 'jb(5_8)' more than once6 integer :: ja(10), jb(10)7 data (ja(k),k=1,9,2) / 5*1 / ! ok8 data (ja(k),k=10,2,-2) / 5*2 / ! ok9 data (jb(k),k=1,9,2) / 5*1 / ! ok10 data (jb(k),k=2,10,3) / 3*2 / ! conflict at 511 end subroutine12end module13