diff options
| author | Andrew Cagney <cagney@redhat.com> | 2002-09-18 23:53:52 +0000 |
|---|---|---|
| committer | Andrew Cagney <cagney@redhat.com> | 2002-09-18 23:53:52 +0000 |
| commit | dec43320d95c180b5601a515fa18bfe541df0448 (patch) | |
| tree | c900791d7b4563b4faf1a96ea7236a80337a8583 /gdb/testsuite | |
| parent | b81654f1c061cfbadd7e270a2920b014d4c9cfdd (diff) | |
| download | gdb-dec43320d95c180b5601a515fa18bfe541df0448.zip gdb-dec43320d95c180b5601a515fa18bfe541df0448.tar.gz gdb-dec43320d95c180b5601a515fa18bfe541df0448.tar.bz2 | |
2002-09-18 Andrew Cagney <ac131313@redhat.com>
* maint.c (maintenance_internal_error): Print the parameter as the
error message.
(maintenance_internal_warning): New function.
(_initialize_maint_cmds): Add command `maint internal-warning'.
* defs.h (internal_warning, internal_vwarning): Declare.
* utils.c (struct internal_problem): Define.
(internal_vproblem): New function.
(internal_warning): New function.
(internal_vwarning): New function.
(internal_warning_problem, internal_error_problem): New variables.
(internal_verror): Just call internal_vproblem.
Index: testsuite/ChangeLog
2002-09-18 Andrew Cagney <ac131313@redhat.com>
* gdb.base/maint.exp: Check `help maint internal-warning'.
Diffstat (limited to 'gdb/testsuite')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/maint.exp | 8 |
2 files changed, 12 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 0d8884a..2dda46d 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2002-09-18 Andrew Cagney <ac131313@redhat.com> + + * gdb.base/maint.exp: Check `help maint internal-warning'. + 2002-09-18 David Carlton <carlton@math.stanford.edu> * gdb.c++/m-static.exp: Remove breakpoints depending on line diff --git a/gdb/testsuite/gdb.base/maint.exp b/gdb/testsuite/gdb.base/maint.exp index ac2e9f8..51f4c9d 100644 --- a/gdb/testsuite/gdb.base/maint.exp +++ b/gdb/testsuite/gdb.base/maint.exp @@ -513,6 +513,14 @@ gdb_expect { timeout { fail "(timeout) help maint internal-error" } } +send_gdb "help maint internal-warning\n" +gdb_expect { + -re "Give GDB an internal warning\\.\r\nCause GDB to behave as if an internal warning was reported\\..*$gdb_prompt $"\ + { pass "help maint internal-warning" } + -re ".*$gdb_prompt $" { fail "help maint internal-warning" } + timeout { fail "(timeout) help maint internal-warning" } + } + send_gdb "help maint print statistics\n" gdb_expect { -re "Print statistics about internal gdb state\\..*$gdb_prompt $"\ |