When processing free form source line continuation, the prescanner treats empty keyword macros as if they were spaces or tabs. After skipping over them, however, there's code that only works if the skipped characters ended with an actual space or tab. If the last skipped item was an empty keyword macro's name, the last character of that name would end up being the first character of the continuation line. Fix.
7 lines
111 B
Fortran
7 lines
111 B
Fortran
! RUN: %flang -E %s 2>&1 | FileCheck %s
|
|
!CHECK: subroutine sub()
|
|
#define empty
|
|
subroutine sub ( &
|
|
empty)
|
|
end
|