File tree Expand file tree Collapse file tree 1 file changed +9
-9
lines changed Expand file tree Collapse file tree 1 file changed +9
-9
lines changed Original file line number Diff line number Diff line change @@ -588,36 +588,36 @@ subroutine get_default_c_compiler(f_compiler, c_compiler)
588
588
end subroutine get_default_c_compiler
589
589
590
590
! > Get C++ Compiler.
591
- subroutine get_default_cpp_compiler (f_compiler , c_compiler )
591
+ subroutine get_default_cpp_compiler (f_compiler , cpp_compiler )
592
592
character (len=* ), intent (in ) :: f_compiler
593
- character (len= :), allocatable , intent (out ) :: c_compiler
593
+ character (len= :), allocatable , intent (out ) :: cpp_compiler
594
594
integer (compiler_enum) :: id
595
595
596
596
id = get_compiler_id(f_compiler)
597
597
598
598
select case (id)
599
599
600
600
case (id_intel_classic_nix, id_intel_classic_mac, id_intel_classic_windows)
601
- c_compiler = ' icpc'
601
+ cpp_compiler = ' icpc'
602
602
603
603
case (id_intel_llvm_nix,id_intel_llvm_windows)
604
- c_compiler = ' icpx'
604
+ cpp_compiler = ' icpx'
605
605
606
606
case (id_flang, id_flang_new, id_f18)
607
- c_compiler = ' clang'
607
+ cpp_compiler = ' clang'
608
608
609
609
case (id_ibmxl)
610
- c_compiler = ' xlc++'
610
+ cpp_compiler = ' xlc++'
611
611
612
612
case (id_lfortran)
613
- c_compiler = ' cc'
613
+ cpp_compiler = ' cc'
614
614
615
615
case (id_gcc)
616
- c_compiler = ' g++'
616
+ cpp_compiler = ' g++'
617
617
618
618
case default
619
619
! Fall-back to using Fortran compiler
620
- c_compiler = f_compiler
620
+ cpp_compiler = f_compiler
621
621
end select
622
622
623
623
end subroutine get_default_cpp_compiler
You can’t perform that action at this time.
0 commit comments