flang/test/Preprocessing/renaming.F


1
2
3
4
5
6
7
8

! 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