ecos.exp: Append .exe instead of a.out as the link output.

2002-01-22  H.J. Lu <hjl@gnu.org>

	* g++.dg/special/ecos.exp: Append .exe instead of a.out as the
	link output.
	* gcc.dg/special/ecos.exp: Likewise.
	* lib/g++-dg.exp: Likewise.
	* lib/g77-dg.exp: Likewise.
	* lib/gcc-dg.exp : Likewise.
	* lib/mike-g++.exp: Likewise.
	* lib/mike-g77.exp: Likewise.
	* lib/mike-gcc.exp: Likewise.
	* lib/objc-dg.exp: Likewise.

From-SVN: r49100

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 17975c205582b0b1196418d554abbe6dcc1d2d70..836457ff0ecbbd12ae0bc03dd1af75475c69dd92 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,16 @@
+2002-01-22  H.J. Lu <hjl@gnu.org>
+
+       * g++.dg/special/ecos.exp: Append .exe instead of a.out as the
+       link output.
+       * gcc.dg/special/ecos.exp: Likewise.
+       * lib/g++-dg.exp: Likewise.
+       * lib/g77-dg.exp: Likewise.
+       * lib/gcc-dg.exp : Likewise.
+       * lib/mike-g++.exp: Likewise.
+       * lib/mike-g77.exp: Likewise.
+       * lib/mike-gcc.exp: Likewise.
+       * lib/objc-dg.exp: Likewise.
+
 2002-01-22  Janis Johnson  <janis187@us.ibm.com>
 
        PR target/5379

diff --git a/gcc/testsuite/g++.dg/special/ecos.exp b/gcc/testsuite/g++.dg/special/ecos.exp
index 224e0868a6ae85ecb0f41c0ac39db07cc73ea5ad..5b560581e75e204631078087c2359da6271c5bc8 100644 (file)
--- a/gcc/testsuite/g++.dg/special/ecos.exp
+++ b/gcc/testsuite/g++.dg/special/ecos.exp
@@ -29,15 +29,15 @@ load_lib g++-dg.exp
 ###########
 
 dg-init
-set lines [g++_target_compile "$srcdir/$subdir/conpr-1.C" "$objdir/a.out" executable ""]
+set lines [g++_target_compile "$srcdir/$subdir/conpr-1.C" "$objdir/conpr-1.exe" executable ""]
 if [string match "*init_priority*" $lines] then {
     xfail "conpr-1.C"
-    file delete $objdir/a.out
+    file delete $objdir/conpr-1.exe
 } elseif ![string match "" $lines] then {
     fail "conpr-1.C"
 } else {
     dg-runtest "$srcdir/$subdir/conpr-1.C" "" "" 
-    file delete $objdir/a.out
+    file delete $objdir/conpr-1.exe
 }
 dg-finish
 
@@ -89,15 +89,15 @@ dg-finish
 ###########
 
 dg-init
-set lines [g++_target_compile "$srcdir/$subdir/initp1.C" "$objdir/a.out" executable ""]
+set lines [g++_target_compile "$srcdir/$subdir/initp1.C" "$objdir/initp1.exe" executable ""]
 if [string match "*init_priority*" $lines] then {
     xfail "initp1.C"
-    file delete $objdir/a.out
+    file delete $objdir/initp1.exe
 } elseif ![string match "" $lines] then {
     fail "initp1.C"
 } else {
     dg-runtest "$srcdir/$subdir/initp1.C" "" ""
-    file delete $objdir/a.out
+    file delete $objdir/initp1.exe
 }
 dg-finish
 

diff --git a/gcc/testsuite/gcc.dg/special/ecos.exp b/gcc/testsuite/gcc.dg/special/ecos.exp
index 271e3da5ac4799c88296a75d24c9a1212dec7438..cc632fc334c8818668db57828e8e751ad3ed29c9 100644 (file)
--- a/gcc/testsuite/gcc.dg/special/ecos.exp
+++ b/gcc/testsuite/gcc.dg/special/ecos.exp
@@ -124,7 +124,7 @@ if { [ check_weak_available ] == 1 } {
         set lines [gcc_target_compile "$srcdir/$subdir/wkali-2b.c" "wkali-2b.o" object ""]
         if [string match "*only weak aliases*" $lines] then {
            xfail "wkali-2b.o"
-           file delete $srcdir/$subdir/a.out
+           file delete $srcdir/$subdir/wkali-2.exe
         } elseif ![string match "" $lines] then {
             fail "wkali-2b.o"
         } else {

diff --git a/gcc/testsuite/lib/g++-dg.exp b/gcc/testsuite/lib/g++-dg.exp
index aeabf4607c2308c1e66dfd0b0e6403ea5970511e..8be839e4dcffbe4854d74b56612b25ce03335dde 100644 (file)
--- a/gcc/testsuite/lib/g++-dg.exp
+++ b/gcc/testsuite/lib/g++-dg.exp
@@ -39,7 +39,7 @@ proc g++-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.
        }
@@ -48,7 +48,7 @@ proc g++-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;

diff --git a/gcc/testsuite/lib/g77-dg.exp b/gcc/testsuite/lib/g77-dg.exp
index ba267317c467a17bc4e06d6b23c47e4b6ae1efd2..396604cd9382f92d212890eddf7d97002ea25bb5 100644 (file)
--- 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;

diff --git a/gcc/testsuite/lib/gcc-dg.exp b/gcc/testsuite/lib/gcc-dg.exp
index 4faa46d8aec635216f171cbcf4f2773910dd5260..403fefc2f11fb42795f1dc392c9b6fb7ce594e93 100644 (file)
--- a/gcc/testsuite/lib/gcc-dg.exp
+++ b/gcc/testsuite/lib/gcc-dg.exp
@@ -71,7 +71,7 @@ proc gcc-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 gcc-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;

diff --git a/gcc/testsuite/lib/mike-g++.exp b/gcc/testsuite/lib/mike-g++.exp
index 61cd5262ecdb3bff6c95be7d718c0c1a2d989729..0844d45a421c1af7ebf7d52495b6bc390d6e1806 100644 (file)
--- a/gcc/testsuite/lib/mike-g++.exp
+++ b/gcc/testsuite/lib/mike-g++.exp
@@ -113,12 +113,12 @@ proc postbase  { src_code run groups args } {
        link
        {
            set compile_type "executable";
-           set output_file "$tmpdir/a.out";
+           append output_file ".exe";
        }
        run
        {
            set compile_type "executable";
-           set output_file "$tmpdir/a.out";
+           append output_file ".exe";
            set run yes;
        }
        default

diff --git a/gcc/testsuite/lib/mike-g77.exp b/gcc/testsuite/lib/mike-g77.exp
index a3e12d429f0c9da12625c3caf9aa80d4cbab123b..ccc9041e3ec395241faeabc6bfd295cf02571b89 100644 (file)
--- a/gcc/testsuite/lib/mike-g77.exp
+++ b/gcc/testsuite/lib/mike-g77.exp
@@ -120,12 +120,12 @@ proc postbase  { src_code run groups args } {
        link
        {
            set compile_type "executable";
-           set output_file "$tmpdir/a.out";
+           append output_file ".exe";
        }
        run
        {
            set compile_type "executable";
-           set output_file "$tmpdir/a.out";
+           append output_file ".exe";
            set run yes;
        }
        default

diff --git a/gcc/testsuite/lib/mike-gcc.exp b/gcc/testsuite/lib/mike-gcc.exp
index 89becfb238186f721e148fce287a76ee508f4722..34cf039cf5128f7c32bb3c97df83e129d5312329 100644 (file)
--- a/gcc/testsuite/lib/mike-gcc.exp
+++ b/gcc/testsuite/lib/mike-gcc.exp
@@ -117,12 +117,12 @@ proc postbase  { src_code run groups args } {
        link
        {
            set compile_type "executable";
-           set output_file "$tmpdir/a.out";
+           append output_file ".exe";
        }
        run
        {
            set compile_type "executable";
-           set output_file "$tmpdir/a.out";
+           append output_file ".exe";
            set run yes;
        }
        default

diff --git a/gcc/testsuite/lib/objc-dg.exp b/gcc/testsuite/lib/objc-dg.exp
index aa4364ce22e59d050075f02150da76e727211c0a..397bb2b9c809deef817dc7ce476792e0cc7f5373 100644 (file)
--- a/gcc/testsuite/lib/objc-dg.exp
+++ b/gcc/testsuite/lib/objc-dg.exp
@@ -73,7 +73,7 @@ proc objc-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.
        }
@@ -82,7 +82,7 @@ proc objc-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;