blob: e0225e695a4789e2a344b2ab9f9345ef41b2efbc [file] [log] [blame]
! RUN: not %flang_fc1 -fsyntax-only %s 2>&1 | FileCheck %s
! CHECK: end.f:3:7: error: Program unit END statement may not be continued in fixed form source
e
+ nd
! CHECK: end.f:6:7: error: Program unit END statement may not be continued in fixed form source
end prog
+ ram
! CHECK: end.f:9:7: error: Program unit END statement may not be continued in fixed form source
end
+ program
! CHECK: end.f:12:7: error: Program unit END statement may not be continued in fixed form source
end
+ program
1 main
! CHECK: end.f:16:7: error: Program unit END statement may not be continued in fixed form source
end program
1 main
! CHECK: end.f:19:7: error: Initial line of continued statement must not appear to be a program unit END in fixed form source
end
+ = end + 1
! CHECK: end.f:22:7: error: Initial line of continued statement must not appear to be a program unit END in fixed form source
end module
+ = end module + 1
! CHECK-NOT: end.f:25:7: error: Initial line of continued statement must not appear to be a program unit END in fixed form source
end =
+ end + 1
! CHECK-NOT: end.f:28:7: error: Initial line of continued statement must not appear to be a program unit END in fixed form source
end block data (
+ 1) = 666