linkage.exp: Prepend directory name to pass/fail message...
authorJanis Johnson <janis187@us.ibm.com>
Thu, 11 Nov 2004 18:00:30 +0000 (18:00 +0000)
committerJanis Johnson <janis@gcc.gnu.org>
Thu, 11 Nov 2004 18:00:30 +0000 (18:00 +0000)
* gcc.misc-tests/linkage.exp: Prepend directory name to pass/fail
message, delete generated files, use more descriptive name for
executable, and make the test unsupported when it cannot be run.

From-SVN: r90487

gcc/testsuite/ChangeLog
gcc/testsuite/gcc.misc-tests/linkage.exp

index f0f8dda8af3044bfd9b869d66d2d7936dd684f82..aea8f21d3e19f4c7ea647866b0bc47544a8a87c4 100644 (file)
@@ -1,5 +1,9 @@
 2004-11-11  Janis Johnson  <janis187@us.ibm.com>
 
+       * gcc.misc-tests/linkage.exp: Prepend directory name to pass/fail
+       message, delete generated files, use more descriptive name for
+       executable, and make the test unsupported when it cannot be run.
+
        * lib/gcc-dg.exp (skip_test_and_clear_xfail): New procedure.
        (dg-require-weak, dg-require-visibility, dg-require-alias,
        dg-require-gc-sections, dg-require-profiling, dg-require-dll,
index 9c8936db05abbd00f3940ebde92f537fbf87c24a..7d4f8e95f03fade1b75b743ae8a193083e34e049 100644 (file)
@@ -21,7 +21,7 @@
 if [isnative] then {
     set lines [gcc_target_compile "$srcdir/$subdir/linkage-x.c" "linkage-x.o" object {additional_flags="-w"}]
     if ![string match "" $lines] then {
-       fail "linkage.c"
+       fail "$subdir/linkage.c compile"
     } else {
        # This is a completely bogus test. Sorry.
 
@@ -65,7 +65,9 @@ if [isnative] then {
            }
        }
 
-       catch { exec rm -f linkage-y.o }
+       if [file exists "linkage-y.o"] then {
+           file delete "linkage-y.o"
+       }
        send_log "cc -c $native_cflags $srcdir/$subdir/linkage-y.c >&/dev/null\n"
        catch { exec cc -c $native_cflags "$srcdir/$subdir/linkage-y.c" >&/dev/null }
        if ![file exists "linkage-y.o"] then {
@@ -73,12 +75,17 @@ if [isnative] then {
            catch { exec c89 -c $native_cflags "$srcdir/$subdir/linkage-y.c" >&/dev/null }
        }
        if [file exists "linkage-y.o"] then {
-           set lines [gcc_target_compile "linkage-y.o linkage-x.o" "x" executable ""]
+           set lines [gcc_target_compile "linkage-y.o linkage-x.o" "linkage.exe" executable ""]
            if [string match "" $lines] then {
-               pass "linkage.c"
+               pass "$subdir/linkage.c link"
+               file delete "linkage.exe"
            } else {
-               fail "linkage.c"
+               fail "$subdir/linkage.c link"
            }
+           file delete "linkage-y.o"
+       } else {
+           unsupported "$subdir/linkage.c native compile failed"
        }
+       file delete "linkage-x.o"
     }
 }