bolt/deps/llvm-18.1.8/flang/test/Preprocessing/renaming.F

9 lines
288 B
FortranFixed
Raw Normal View History

2025-02-14 19:21:04 +01:00
! RUN: %flang -E %s | FileCheck %s
! CHECK: ((1)*10000+(11)*100)
! Ensure that a keyword-like macro can be used to rename a
! function-like macro.
#define TO_VERSION2(MAJOR, MINOR) ((MAJOR) * 10000 + (MINOR) * 100)
#define TO_VERSION TO_VERSION2
print *, TO_VERSION(1,11)
end