1! Check that the driver correctly defines macros with the compiler version 2 3!-------------------------- 4! FLANG DRIVER (flang-new) 5!-------------------------- 6! RUN: %flang_fc1 -E %s 2>&1 | FileCheck %s --ignore-case 7 8!----------------------------------------- 9! FRONTEND FLANG DRIVER (flang-new -fc1) 10!----------------------------------------- 11! RUN: %flang_fc1 -E %s 2>&1 | FileCheck %s --ignore-case 12 13! CHECK: flang = 1 14! CHECK: flang_major = {{[1-9][0-9]*$}} 15! CHECK: flang_minor = {{[0-9]+$}} 16! CHECK: flang_patchlevel = {{[0-9]+$}} 17 18integer, parameter :: flang = __flang__ 19integer, parameter :: flang_major = __flang_major__ 20integer, parameter :: flang_minor = __flang_minor__ 21integer, parameter :: flang_patchlevel = __flang_patchlevel__ 22