Skip to content

Commit 91ae653

Browse files
committed
resolve flang to id_flang_new
1 parent 09d5485 commit 91ae653

File tree

1 file changed

+8
-3
lines changed

1 file changed

+8
-3
lines changed

src/fpm_compiler.F90

Lines changed: 8 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -10,7 +10,7 @@
1010
! Intel oneAPI ifx icx -module -I -qopenmp X
1111
! PGI pgfortran pgcc -module -I -mp X
1212
! NVIDIA nvfortran nvc -module -I -mp X
13-
! LLVM flang flang clang -module -I -mp X
13+
! LLVM flang flang clang -module-dir -I -fopenmp X
1414
! LFortran lfortran --- -J -I --openmp X
1515
! Lahey/Futjitsu lfc ? -M -I -openmp ?
1616
! NAG nagfor ? -mdir -I -openmp x
@@ -1000,11 +1000,16 @@ function get_id(compiler) result(id)
10001000
return
10011001
end if
10021002

1003-
if (check_compiler(compiler, "flang")) then
1003+
if (check_compiler(compiler, "flang-classic")) then
10041004
id = id_flang
10051005
return
10061006
end if
10071007

1008+
if (check_compiler(compiler, "flang")) then
1009+
id = id_flang_new
1010+
return
1011+
end if
1012+
10081013
if (check_compiler(compiler, "xlf90")) then
10091014
id = id_ibmxl
10101015
return
@@ -1745,7 +1750,7 @@ pure function compiler_name(self) result(name)
17451750
case(id_pgi); name = "pgfortran"
17461751
case(id_nvhpc); name = "nvfortran"
17471752
case(id_nag); name = "nagfor"
1748-
case(id_flang); name = "flang"
1753+
case(id_flang); name = "flang-classic"
17491754
case(id_flang_new); name = "flang-new"
17501755
case(id_f18); name = "f18"
17511756
case(id_ibmxl); name = "xlf90"

0 commit comments

Comments
 (0)