summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@gnat.com>2004-04-01 17:45:48 +0000
committerJoel Brobecker <brobecker@gnat.com>2004-04-01 17:45:48 +0000
commit4aad510644c5782c222755067f8ea497e7d1c330 (patch)
treecc62647299db65440b1f5d51632c0eb4709cb492
parentac80f7c8cae17e87f93334b658515af8870480ed (diff)
downloadgdb-4aad510644c5782c222755067f8ea497e7d1c330.tar.gz
* lib/ada.exp (gdb_compile_ada): Emit UNSUPPORTED if we failed
to build the application. Remove the message printed when in verbose mode, redundant with the UNSUPPORTED message above.
-rw-r--r--gdb/testsuite/ChangeLog6
-rw-r--r--gdb/testsuite/lib/ada.exp2
2 files changed, 7 insertions, 1 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index a5664a39062..40409f90da3 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2004-04-01 Joel Brobecker <brobecker@gnat.com>
+
+ * lib/ada.exp (gdb_compile_ada): Emit UNSUPPORTED if we failed
+ to build the application. Remove the message printed when in
+ verbose mode, redundant with the UNSUPPORTED message above.
+
2004-03-31 Joel Brobecker <brobecker@gnat.com>
* gdb.ada (bar.ads, bar.adb, null_record.adb): New files.
diff --git a/gdb/testsuite/lib/ada.exp b/gdb/testsuite/lib/ada.exp
index 67a507b62ef..9fab3af2bdf 100644
--- a/gdb/testsuite/lib/ada.exp
+++ b/gdb/testsuite/lib/ada.exp
@@ -405,7 +405,7 @@ proc gdb_compile_ada {source dest type options} {
# We therefore simply check whether the dest file has been created
# or not. Unless not present, the build has succeeded.
if ![file exists $dest] {
- verbose "Ada compilation failed: $result"
+ unsupported "Ada compilation failed: $result"
return "Ada compilation failed."
}
}