diff options
Diffstat (limited to 'gcc/testsuite/lib/gfortran.exp')
-rw-r--r-- | gcc/testsuite/lib/gfortran.exp | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/gcc/testsuite/lib/gfortran.exp b/gcc/testsuite/lib/gfortran.exp index 4303871e3f9..07787cc5bcc 100644 --- a/gcc/testsuite/lib/gfortran.exp +++ b/gcc/testsuite/lib/gfortran.exp @@ -187,16 +187,7 @@ proc gfortran_init { args } { unset gluefile } - if { [target_info needs_status_wrapper] != "" } { - set gluefile ${tmpdir}/gfortran-testglue.o; - set result [build_wrapper $gluefile]; - if { $result != "" } { - set gluefile [lindex $result 0]; - set wrap_flags [lindex $result 1]; - } else { - unset gluefile - } - } + gfortran_maybe_build_wrapper "${tmpdir}/gfortran-testglue.o" set ALWAYS_GFORTRANFLAGS "" |