diff --git a/_resources/port1.0/group/compiler_wrapper-1.0.tcl b/_resources/port1.0/group/compiler_wrapper-1.0.tcl index 33d9daa40f41f..4d70f96b72144 100644 --- a/_resources/port1.0/group/compiler_wrapper-1.0.tcl +++ b/_resources/port1.0/group/compiler_wrapper-1.0.tcl @@ -67,9 +67,14 @@ proc compwrap::trim {c} { proc compwrap::comp_flags {tag} { switch ${tag} { cc { set ftag "c" } + f77 { set ftag "f" } default { set ftag ${tag} } } - return "[option configure.${ftag}flags] [get_canonical_archflags ${tag}]" + set flags "[get_canonical_archflags ${tag}]" + if { [info exists configure.${ftag}flags] } { + set flags "[option configure.${ftag}flags] ${flags}" + } + return ${flags} } proc compwrap::wrapper_path {tag} {