Skip to content

Commit 937b87e

Browse files
committed
Update LFortran in compiler settings
1 parent 6f891ed commit 937b87e

File tree

1 file changed

+10
-4
lines changed

1 file changed

+10
-4
lines changed

src/fpm_compiler.f90

Lines changed: 10 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,7 @@
1111
! PGI pgfortran pgcc -module -I -mp X
1212
! NVIDIA nvfortran nvc -module -I -mp X
1313
! LLVM flang flang clang -module -I -mp X
14-
! LFortran lfortran --- ? ? ? X
14+
! LFortran lfortran --- -J -I --openmp X
1515
! Lahey/Futjitsu lfc ? -M -I -openmp ?
1616
! NAG nagfor ? -mdir -I -openmp x
1717
! Cray crayftn craycc -J -I -homp ?
@@ -268,6 +268,8 @@ subroutine get_release_compile_flags(id, flags)
268268
flag_nag_coarray//&
269269
flag_nag_pic
270270

271+
case(id_lfortran)
272+
flags = ""
271273
end select
272274
end subroutine get_release_compile_flags
273275

@@ -356,6 +358,9 @@ subroutine get_debug_compile_flags(id, flags)
356358
flag_nag_backtrace//&
357359
flag_nag_coarray//&
358360
flag_nag_pic
361+
362+
case(id_lfortran)
363+
flags = ""
359364
end select
360365
end subroutine get_debug_compile_flags
361366

@@ -370,7 +375,8 @@ function get_include_flag(self, path) result(flags)
370375

371376
case(id_caf, id_gcc, id_f95, id_cray, id_nvhpc, id_pgi, id_flang, &
372377
& id_intel_classic_nix, id_intel_classic_mac, &
373-
& id_intel_llvm_nix, id_lahey, id_nag, id_ibmxl)
378+
& id_intel_llvm_nix, id_lahey, id_nag, id_ibmxl, &
379+
& id_lfortran)
374380
flags = "-I "//path
375381

376382
case(id_intel_classic_windows, id_intel_llvm_windows)
@@ -388,7 +394,7 @@ function get_module_flag(self, path) result(flags)
388394
case default
389395
flags = "-module "//path
390396

391-
case(id_caf, id_gcc, id_f95, id_cray)
397+
case(id_caf, id_gcc, id_f95, id_cray, id_lfortran)
392398
flags = "-J "//path
393399

394400
case(id_nvhpc, id_pgi, id_flang)
@@ -556,7 +562,7 @@ function get_id(compiler) result(id)
556562
return
557563
end if
558564

559-
if (check_compiler(compiler, "lfort")) then
565+
if (check_compiler(compiler, "lfortran")) then
560566
id = id_lfortran
561567
return
562568
end if

0 commit comments

Comments
 (0)