From 9bf7038bb229d6e46a1f1861c257fc47843f114d Mon Sep 17 00:00:00 2001 From: Tom Tromey Date: Mon, 3 Jun 2019 09:25:39 -0600 Subject: [PATCH] Update help text in ada-lang.c I noticed that the "catch assert" help text erroneously claimed to accept an argument, and while fixing this I went ahead and added "Usage" text and made other minor updates to the commands in ada-lang.c. Tested on x86-64 Fedora 29. gdb/ChangeLog 2019-06-10 Tom Tromey * ada-lang.c (_initialize_ada_language): Update help text. --- gdb/ChangeLog | 4 ++++ gdb/ada-lang.c | 18 +++++++++++++----- 2 files changed, 17 insertions(+), 5 deletions(-) diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 59dde119b70..d539e813f68 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,7 @@ +2019-06-10 Tom Tromey + + * ada-lang.c (_initialize_ada_language): Update help text. + 2019-06-10 Tom Tromey * m32c-tdep.c (m32c_m16c_address_to_pointer): Don't end warning diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index 22c51fbf082..1f0ada35902 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -14407,14 +14407,15 @@ overloads selection menu is activated"), add_catch_command ("exception", _("\ Catch Ada exceptions, when raised.\n\ -Usage: catch exception [ ARG ]\n\ -\n\ +Usage: catch exception [ARG] [if CONDITION]\n\ Without any argument, stop when any Ada exception is raised.\n\ If ARG is \"unhandled\" (without the quotes), only stop when the exception\n\ being raised does not have a handler (and will therefore lead to the task's\n\ termination).\n\ Otherwise, the catchpoint only stops when the name of the exception being\n\ -raised is the same as ARG."), +raised is the same as ARG.\n\ +CONDITION is a boolean expression that is evaluated to see whether the\n\ +exception should cause a stop."), catch_ada_exception_command, catch_ada_completer, CATCH_PERMANENT, @@ -14422,14 +14423,20 @@ raised is the same as ARG."), add_catch_command ("handlers", _("\ Catch Ada exceptions, when handled.\n\ -With an argument, catch only exceptions with the given name."), +Usage: catch handlers [ARG] [if CONDITION]\n\ +Without any argument, stop when any Ada exception is handled.\n\ +With an argument, catch only exceptions with the given name.\n\ +CONDITION is a boolean expression that is evaluated to see whether the\n\ +exception should cause a stop."), catch_ada_handlers_command, catch_ada_completer, CATCH_PERMANENT, CATCH_TEMPORARY); add_catch_command ("assert", _("\ Catch failed Ada assertions, when raised.\n\ -With an argument, catch only exceptions with the given name."), +Usage: catch assert [if CONDITION]\n\ +CONDITION is a boolean expression that is evaluated to see whether the\n\ +exception should cause a stop."), catch_assert_command, NULL, CATCH_PERMANENT, @@ -14447,6 +14454,7 @@ and exceeds this limit will cause an error."), add_info ("exceptions", info_exceptions_command, _("\ List all Ada exception names.\n\ +Usage: info exceptions [REGEXP]\n\ If a regular expression is passed as an argument, only those matching\n\ the regular expression are listed.")); -- 2.30.2