From 5c8378a7a2662941f64ef85e359ee0465c49c712 Mon Sep 17 00:00:00 2001 From: David Billinghurst Date: Fri, 20 Apr 2001 07:25:43 +0000 Subject: [PATCH] old-dejagnu.exp: Don't delete output of executable. * lib/old-dejagnu.exp: Don't delete output of executable. Add .exe suffix to executables. Co-Authored-By: Mark Mitchell From-SVN: r41443 --- gcc/testsuite/ChangeLog | 6 ++++++ gcc/testsuite/lib/old-dejagnu.exp | 9 +++++---- 2 files changed, 11 insertions(+), 4 deletions(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 16e28e1ec32..c6d3012358f 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2001-04-19 David Billinghurst + Mark Mitchell + + * lib/old-dejagnu.exp: Don't delete output of executable. + Add .exe suffix to executables. + 2001-04-18 Toon Moene * g77.f-torture/execute/short.x; Remove - Error has been fixed. diff --git a/gcc/testsuite/lib/old-dejagnu.exp b/gcc/testsuite/lib/old-dejagnu.exp index aaac095b21a..8384e8392c6 100644 --- a/gcc/testsuite/lib/old-dejagnu.exp +++ b/gcc/testsuite/lib/old-dejagnu.exp @@ -1,4 +1,4 @@ -# Copyright (C) 1988, 90, 91, 92, 1994, 1996, 1997, 2000 Free Software Foundation, Inc. +# Copyright (C) 1988, 90, 91, 92, 1994, 1996, 1997, 2000, 2001 Free Software Foundation, Inc. # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by @@ -233,7 +233,7 @@ proc old-dejagnu { compiler prog name cflagsx default_cflags libs } { lappend cflags "compiler=$compiler" regsub -all "\[./\]" "$name" "-" output; - set output "$tmpdir/$output"; + set output "$tmpdir/$output.exe"; set compile_type "executable" set tmp [lindex [grep $prog "Build don.t link:"] 0] @@ -574,9 +574,10 @@ proc old-dejagnu { compiler prog name cflagsx default_cflags libs } { } $status "$name $pattern Execution test" } + } else { + verbose "deleting $output" + remote_file build delete $output } - verbose "deleting $output" - remote_file build delete $output return 0 } -- 2.30.2