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