diff options
Diffstat (limited to 'gcc/testsuite/lib/g77-dg.exp')
| -rw-r--r-- | gcc/testsuite/lib/g77-dg.exp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/testsuite/lib/g77-dg.exp b/gcc/testsuite/lib/g77-dg.exp index ba26731..396604c 100644 --- a/gcc/testsuite/lib/g77-dg.exp +++ b/gcc/testsuite/lib/g77-dg.exp @@ -71,7 +71,7 @@ proc g77-dg-test { prog do_what extra_tool_flags } { } "link" { set compile_type "executable" - set output_file "a.out" + set output_file "[file rootname [file tail $prog]].exe" # The following line is needed for targets like the i960 where # the default output file is b.out. Sigh. } @@ -80,7 +80,7 @@ proc g77-dg-test { prog do_what extra_tool_flags } { # FIXME: "./" is to cope with "." not being in $PATH. # Should this be handled elsewhere? # YES. - set output_file "./a.out" + set output_file "./[file rootname [file tail $prog]].exe" # This is the only place where we care if an executable was # created or not. If it was, dg.exp will try to run it. remote_file build delete $output_file; |