mirror of
https://github.com/intel/llvm.git
synced 2026-01-18 07:57:36 +08:00
The preprocessor can perform macro replacement within identifiers when they are split up with Fortran line continuation, but is failing to do macro replacement on a continued identifier when none of its parts are replaced.
26 lines
358 B
Fortran
26 lines
358 B
Fortran
! RUN: %flang -E %s 2>&1 | FileCheck %s
|
|
#define FOO BAR
|
|
#define FO BA
|
|
#define OO AR
|
|
! CHECK: print *,BAR, 1
|
|
print *,
|
|
+FOO
|
|
+, 1
|
|
print *,
|
|
! CHECK: print *,FAR, 2
|
|
+F
|
|
+OO
|
|
+, 2
|
|
! CHECK: print *,BAO, 3
|
|
print *,
|
|
+FO
|
|
+O
|
|
+, 3
|
|
! CHECK: print *,BAR, 4
|
|
print *,
|
|
+F
|
|
+O
|
|
+O
|
|
+, 4
|
|
end
|