diff options
-rw-r--r-- | gdb/ChangeLog | 4 | ||||
-rw-r--r-- | gdb/ada-lang.c | 18 |
2 files changed, 17 insertions, 5 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 59dde11..d539e81 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,9 @@ 2019-06-10 Tom Tromey <tromey@adacore.com> + * ada-lang.c (_initialize_ada_language): Update help text. + +2019-06-10 Tom Tromey <tromey@adacore.com> + * m32c-tdep.c (m32c_m16c_address_to_pointer): Don't end warning with a newline. * guile/guile.c (handle_boot_error): Don't end warning with a diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index 22c51fb..1f0ada3 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.")); |