From: Ben Elliston <bje@gnu.org>
Date: Thu, 4 Nov 2004 03:57:51 +0000 (+0000)
Subject: 	* lib/dg.exp (dg-test): If a `dg-do run' test fails to compile,
X-Git-Tag: upstream/1.6.2~418
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=c010382df8a5da9dda7dc091d7b716517e28e299;p=platform%2Fupstream%2Fdejagnu.git

	* lib/dg.exp (dg-test): If a `dg-do run' test fails to compile,
	mark the test as unresolved, rather than warning.
---

diff --git a/ChangeLog b/ChangeLog
index 40f9b6f..ed97dc2 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2004-11-04  Ben Elliston  <bje@gnu.org>
+
+	* lib/dg.exp (dg-test): If a `dg-do run' test fails to compile,
+	mark the test as unresolved, rather than warning.
+
 2004-10-27  Nick Clifton  <nickc@redhat.com>
 
 	* baseboards/iq2000-sim.exp: New file.
diff --git a/lib/dg.exp b/lib/dg.exp
index ac56cbb..890662f 100644
--- a/lib/dg.exp
+++ b/lib/dg.exp
@@ -1,6 +1,6 @@
 # `dg' general purpose testcase driver.
 # Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
-# 2001, 2002, 2003 Free Software Foundation, Inc.
+# 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
 #
 # This file is part of DejaGnu.
 #
@@ -832,7 +832,7 @@ proc dg-test { args } {
     # the `keyword' argument of dg-do.  This could be cleaned up.
     if { [lindex ${dg-do-what} 0] == "run" } {
 	if ![file exists $output_file] {
-	    warning "$name compilation failed to produce executable"
+	    unresolved "$name compilation failed to produce executable"
 	} else {
 	    set status -1
 	    set result [${tool}_load $output_file]