You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

11 lines
223 B

! RUN: not %f18 -funparse-with-symbols %s 2>&1 | FileCheck %s
! CHECK: '60' not a FORMAT
! CHECK: data transfer use of '60'
subroutine s(a)
real a(10)
write(*,60) "Hi there"
60 continue
70 format (i8)
end subroutine s