diff options
author | Joel Brobecker <brobecker@gnat.com> | 2004-04-01 17:45:48 +0000 |
---|---|---|
committer | Joel Brobecker <brobecker@gnat.com> | 2004-04-01 17:45:48 +0000 |
commit | 4aad510644c5782c222755067f8ea497e7d1c330 (patch) | |
tree | cc62647299db65440b1f5d51632c0eb4709cb492 | |
parent | ac80f7c8cae17e87f93334b658515af8870480ed (diff) | |
download | gdb-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/ChangeLog | 6 | ||||
-rw-r--r-- | gdb/testsuite/lib/ada.exp | 2 |
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." } } |