From 414e70e3d0b9db60b826689d972f7781eafd5998 Mon Sep 17 00:00:00 2001 From: Joel Brobecker Date: Thu, 1 Apr 2004 17:45:48 +0000 Subject: [PATCH] * 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. --- gdb/testsuite/ChangeLog | 6 ++++++ gdb/testsuite/lib/ada.exp | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) 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 + + * 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 * 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." } } -- 2.30.2