@@ -275,13 +275,13 @@ module fpm_compiler
275
275
flag_cray_free_form = " -ffree"
276
276
277
277
character (* ), parameter :: &
278
- flag_flang_openmp = " -fopenmp"
279
- flag_flang_new_debug = " -g" , &
280
- flag_flang_new_opt = " -O3" , &
281
- flag_flang_new_pic = " -fPIC" , &
282
- flag_flang_new_free_form = " -ffree-form" , &
283
- flag_flang_new_fixed_form = " -ffixed-form" , &
284
- flag_flang_new_no_implicit_typing = " -fimplicit-none"
278
+ flag_flang_openmp = " -fopenmp" , &
279
+ flag_flang_debug = " -g" , &
280
+ flag_flang_opt = " -O3" , &
281
+ flag_flang_pic = " -fPIC" , &
282
+ flag_flang_free_form = " -ffree-form" , &
283
+ flag_flang_fixed_form = " -ffixed-form" , &
284
+ flag_flang_no_implicit_typing = " -fimplicit-none"
285
285
286
286
contains
287
287
@@ -422,8 +422,8 @@ subroutine get_release_compile_flags(id, flags)
422
422
423
423
case (id_flang)
424
424
flags = &
425
- flag_flang_new_opt // &
426
- flag_flang_new_pic
425
+ flag_flang_opt // &
426
+ flag_flang_pic
427
427
428
428
end select
429
429
end subroutine get_release_compile_flags
@@ -523,8 +523,8 @@ subroutine get_debug_compile_flags(id, flags)
523
523
524
524
case (id_flang)
525
525
flags = &
526
- flag_flang_new_debug // &
527
- flag_flang_new_pic
526
+ flag_flang_debug // &
527
+ flag_flang_pic
528
528
529
529
end select
530
530
end subroutine get_debug_compile_flags
@@ -727,7 +727,7 @@ function get_feature_flag(self, feature) result(flags)
727
727
flags = flag_cray_no_implicit_typing
728
728
729
729
case (id_flang)
730
- flags = flag_flang_new_no_implicit_typing
730
+ flags = flag_flang_no_implicit_typing
731
731
732
732
end select
733
733
@@ -778,7 +778,7 @@ function get_feature_flag(self, feature) result(flags)
778
778
flags = flag_cray_free_form
779
779
780
780
case (id_flang)
781
- flags = flag_flang_new_free_form
781
+ flags = flag_flang_free_form
782
782
783
783
end select
784
784
@@ -807,7 +807,7 @@ function get_feature_flag(self, feature) result(flags)
807
807
flags = flag_lfortran_fixed_form
808
808
809
809
case (id_flang)
810
- flags = flag_flang_new_fixed_form
810
+ flags = flag_flang_fixed_form
811
811
812
812
end select
813
813
0 commit comments