18 lines · plain
1! RUN: %python %S/test_errors.py %s %flang_fc12program main3 contains4 subroutine subr5 data foo/6.66/ ! implicit declaration of "foo": ok6 integer m7 !ERROR: Implicitly typed local entity 'n' not allowed in specification expression8 real a(n)9 !ERROR: Host-associated object 'n' must not be initialized in a DATA statement10 data n/123/11 block12 real b(m)13 !ERROR: Host-associated object 'm' must not be initialized in a DATA statement14 data m/10/15 end block16 end subroutine17end program18