From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 17223 invoked by alias); 14 Aug 2008 23:24:33 -0000 Received: (qmail 17174 invoked by uid 22791); 14 Aug 2008 23:24:28 -0000 X-Spam-Check-By: sourceware.org Received: from mx1.redhat.com (HELO mx1.redhat.com) (66.187.233.31) by sourceware.org (qpsmtpd/0.31) with ESMTP; Thu, 14 Aug 2008 23:23:54 +0000 Received: from int-mx1.corp.redhat.com (int-mx1.corp.redhat.com [172.16.52.254]) by mx1.redhat.com (8.13.8/8.13.8) with ESMTP id m7ENNqDk031681 for ; Thu, 14 Aug 2008 19:23:52 -0400 Received: from pobox.corp.redhat.com (pobox.corp.redhat.com [10.11.255.20]) by int-mx1.corp.redhat.com (8.13.1/8.13.1) with ESMTP id m7ENNpO1008231; Thu, 14 Aug 2008 19:23:51 -0400 Received: from opsy.redhat.com (vpn-10-34.bos.redhat.com [10.16.10.34]) by pobox.corp.redhat.com (8.13.1/8.13.1) with ESMTP id m7ENNobk000698; Thu, 14 Aug 2008 19:23:50 -0400 Received: by opsy.redhat.com (Postfix, from userid 500) id A82DE8880FB; Thu, 14 Aug 2008 17:23:54 -0600 (MDT) To: gdb-patches@sourceware.org Subject: Re: RFA: fix PR 1535 References: <20080814174814.GB15804@caradoc.them.org> From: Tom Tromey Reply-To: Tom Tromey X-Attribution: Tom Date: Thu, 14 Aug 2008 23:24:00 -0000 In-Reply-To: <20080814174814.GB15804@caradoc.them.org> (Daniel Jacobowitz's message of "Thu\, 14 Aug 2008 13\:48\:14 -0400") Message-ID: User-Agent: Gnus/5.11 (Gnus v5.11) Emacs/22.1 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: quoted-printable Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org X-SW-Source: 2008-08/txt/msg00392.txt.bz2 Daniel> Just my taste, but I think this is pretty ugly. Manually expanded Daniel> tables wouldn't be any better. I think it's not as much extra typi= ng Daniel> as you'd think to do it all without the tables. Yeah, you're right. How pedantically C is gdb? Here I cast some small integers to 'void*'. Alternatively I could turn the "context" into a union, or make some globals. This patch also deletes the unimplemented catch subcommands. Also, I notice that hardly anything else uses the 'sfunc' code. Is the intent to restrict this just to 'set' functions? IOW, is this an abuse? Tested on x86-64 (compile farm). Ok? Tom 2008-08-14 Tom Tromey PR gdb/1535: * breakpoint.c (CATCH_PERMANENT, CATCH_TEMPORARY): New macros. (ep_find_event_name_end): Remove. (catch_fork_temporary, catch_vfork_temporary, catch_fork_permanent, catch_vfork_permanent): New constants. (catch_vfork, catch_fork): Remove. (catch_fork_command_1): Add 'command' argument. Remove 'fork_kind' and 'tempflag'. Handle NULL 'arg'. Update switch for all cases. (catch_exec_command_1): Add 'command' argument; remove 'tempflag'. Handle NULL 'arg'. (catch_load_command_1): Likewise. (catch_unload_command_1): Likewise. (catch_ada_exception_command): Likewise. (catch_assert_command): Likewise. (catch_catch_command): New function. (catch_throw_command): Likewise. (catch_command_1): Remove. (catch_command): Just call error. (tcatch_command): Likewise. (catch_cmdlist): New global. (tcatch_cmdlist): Likewise. (add_catch_command): New function. (_initialize_breakpoint): Create "catch" and "tcatch" as prefix commands. Create all catch sub-commands. 2008-08-14 Tom Tromey * gdb.base/help.exp (help catch): Rewrite. diff --git a/gdb/breakpoint.c b/gdb/breakpoint.c index 2a10d61..528f623 100644 --- a/gdb/breakpoint.c +++ b/gdb/breakpoint.c @@ -59,9 +59,11 @@ =20 #include "mi/mi-common.h" =20 -/* Prototypes for local functions. */ +/* Arguments to pass as context to some catch command handlers. */ +#define CATCH_PERMANENT ((void *) 0) +#define CATCH_TEMPORARY ((void *) 1) =20 -static void catch_command_1 (char *, int, int); +/* Prototypes for local functions. */ =20 static void enable_delete_command (char *, int); =20 @@ -167,8 +169,6 @@ static void stopin_command (char *arg, int from_tty); =20 static void stopat_command (char *arg, int from_tty); =20 -static char *ep_find_event_name_end (char *arg); - static char *ep_parse_optional_if_clause (char **arg); =20 static char *ep_parse_optional_filename (char **arg); @@ -6251,36 +6251,6 @@ ep_skip_leading_whitespace (char **s) *s +=3D 1; } =20 -/* This function examines a string, and attempts to find a token - that might be an event name in the leading characters. If a - possible match is found, a pointer to the last character of - the token is returned. Else, NULL is returned. */ - -static char * -ep_find_event_name_end (char *arg) -{ - char *s =3D arg; - char *event_name_end =3D NULL; - - /* If we could depend upon the presense of strrpbrk, we'd use that... */ - if (arg =3D=3D NULL) - return NULL; - - /* We break out of the loop when we find a token delimiter. - Basically, we're looking for alphanumerics and underscores; - anything else delimites the token. */ - while (*s !=3D '\0') - { - if (!isalnum (*s) && (*s !=3D '_')) - break; - event_name_end =3D s; - s++; - } - - return event_name_end; -} - - /* This function attempts to parse an optional "if " clause from the arg string. If one is not found, it returns NULL. =20 @@ -6352,16 +6322,24 @@ ep_parse_optional_filename (char **arg) =20 typedef enum { - catch_fork, catch_vfork + catch_fork_temporary, catch_vfork_temporary, + catch_fork_permanent, catch_vfork_permanent } catch_fork_kind; =20 static void -catch_fork_command_1 (catch_fork_kind fork_kind, char *arg, int tempflag, - int from_tty) +catch_fork_command_1 (char *arg, int from_tty, struct cmd_list_element *co= mmand) { char *cond_string =3D NULL; + catch_fork_kind fork_kind; + int tempflag; + + fork_kind =3D (catch_fork_kind) get_cmd_context (command); + tempflag =3D (fork_kind =3D=3D catch_fork_temporary + || fork_kind =3D=3D catch_vfork_temporary); =20 + if (!arg) + arg =3D ""; ep_skip_leading_whitespace (&arg); =20 /* The allowed syntax is: @@ -6378,10 +6356,12 @@ catch_fork_command_1 (catch_fork_kind fork_kind, ch= ar *arg, int tempflag, and enable reporting of such events. */ switch (fork_kind) { - case catch_fork: + case catch_fork_temporary: + case catch_fork_permanent: create_fork_event_catchpoint (tempflag, cond_string); break; - case catch_vfork: + case catch_vfork_temporary: + case catch_vfork_permanent: create_vfork_event_catchpoint (tempflag, cond_string); break; default: @@ -6391,10 +6371,15 @@ catch_fork_command_1 (catch_fork_kind fork_kind, ch= ar *arg, int tempflag, } =20 static void -catch_exec_command_1 (char *arg, int tempflag, int from_tty) +catch_exec_command_1 (char *arg, int from_tty, struct cmd_list_element *co= mmand) { + int tempflag; char *cond_string =3D NULL; =20 + tempflag =3D get_cmd_context (command) =3D=3D CATCH_TEMPORARY; + + if (!arg) + arg =3D ""; ep_skip_leading_whitespace (&arg); =20 /* The allowed syntax is: @@ -6413,11 +6398,16 @@ catch_exec_command_1 (char *arg, int tempflag, int = from_tty) } =20 static void -catch_load_command_1 (char *arg, int tempflag, int from_tty) +catch_load_command_1 (char *arg, int from_tty, struct cmd_list_element *co= mmand) { + int tempflag; char *dll_pathname =3D NULL; char *cond_string =3D NULL; =20 + tempflag =3D get_cmd_context (command) =3D=3D CATCH_TEMPORARY; + + if (!arg) + arg =3D ""; ep_skip_leading_whitespace (&arg); =20 /* The allowed syntax is: @@ -6455,11 +6445,17 @@ catch_load_command_1 (char *arg, int tempflag, int = from_tty) } =20 static void -catch_unload_command_1 (char *arg, int tempflag, int from_tty) +catch_unload_command_1 (char *arg, int from_tty, + struct cmd_list_element *command) { + int tempflag; char *dll_pathname =3D NULL; char *cond_string =3D NULL; =20 + tempflag =3D get_cmd_context (command) =3D=3D CATCH_TEMPORARY; + + if (!arg) + arg =3D ""; ep_skip_leading_whitespace (&arg); =20 /* The allowed syntax is: @@ -6598,6 +6594,8 @@ catch_exception_command_1 (enum exception_event_kind = ex_event, char *arg, char *cond_string =3D NULL; struct symtab_and_line *sal =3D NULL; =20 + if (!arg) + arg =3D ""; ep_skip_leading_whitespace (&arg); =20 cond_string =3D ep_parse_optional_if_clause (&arg); @@ -6615,6 +6613,24 @@ catch_exception_command_1 (enum exception_event_kind= ex_event, char *arg, warning (_("Unsupported with this platform/compiler combination.")); } =20 +/* Implementation of "catch catch" command. */ + +static void +catch_catch_command (char *arg, int from_tty, struct cmd_list_element *com= mand) +{ + int tempflag =3D get_cmd_context (command) =3D=3D CATCH_TEMPORARY; + catch_exception_command_1 (EX_EVENT_CATCH, arg, tempflag, from_tty); +} + +/* Implementation of "catch throw" command. */ + +static void +catch_throw_command (char *arg, int from_tty, struct cmd_list_element *com= mand) +{ + int tempflag =3D get_cmd_context (command) =3D=3D CATCH_TEMPORARY; + catch_exception_command_1 (EX_EVENT_THROW, arg, tempflag, from_tty); +} + /* Create a breakpoint struct for Ada exception catchpoints. */ =20 static void @@ -6664,8 +6680,10 @@ create_ada_exception_breakpoint (struct symtab_and_l= ine sal, /* Implement the "catch exception" command. */ =20 static void -catch_ada_exception_command (char *arg, int tempflag, int from_tty) +catch_ada_exception_command (char *arg, int from_tty, + struct cmd_list_element *command) { + int tempflag; struct symtab_and_line sal; enum bptype type; char *addr_string =3D NULL; @@ -6674,6 +6692,10 @@ catch_ada_exception_command (char *arg, int tempflag= , int from_tty) struct expression *cond =3D NULL; struct breakpoint_ops *ops =3D NULL; =20 + tempflag =3D get_cmd_context (command) =3D=3D CATCH_TEMPORARY; + + if (!arg) + arg =3D ""; sal =3D ada_decode_exception_location (arg, &addr_string, &exp_string, &cond_string, &cond, &ops); create_ada_exception_breakpoint (sal, addr_string, exp_string, @@ -6684,138 +6706,33 @@ catch_ada_exception_command (char *arg, int tempfl= ag, int from_tty) /* Implement the "catch assert" command. */ =20 static void -catch_assert_command (char *arg, int tempflag, int from_tty) +catch_assert_command (char *arg, int from_tty, struct cmd_list_element *co= mmand) { + int tempflag; struct symtab_and_line sal; char *addr_string =3D NULL; struct breakpoint_ops *ops =3D NULL; =20 + tempflag =3D get_cmd_context (command) =3D=3D CATCH_TEMPORARY; + + if (!arg) + arg =3D ""; sal =3D ada_decode_assert_location (arg, &addr_string, &ops); create_ada_exception_breakpoint (sal, addr_string, NULL, NULL, NULL, ops, tempflag, from_tty); } =20 static void -catch_command_1 (char *arg, int tempflag, int from_tty) -{ - - /* The first argument may be an event name, such as "start" or "load". - If so, then handle it as such. If it doesn't match an event name, - then attempt to interpret it as an exception name. (This latter is - the v4.16-and-earlier GDB meaning of the "catch" command.) - - First, try to find the bounds of what might be an event name. */ - char *arg1_start =3D arg; - char *arg1_end; - int arg1_length; - - if (arg1_start =3D=3D NULL) - { - /* Old behaviour was to use pre-v-4.16 syntax */ - /* catch_throw_command_1 (arg1_start, tempflag, from_tty); */ - /* return; */ - /* Now, this is not allowed */ - error (_("Catch requires an event name.")); - - } - arg1_end =3D ep_find_event_name_end (arg1_start); - if (arg1_end =3D=3D NULL) - error (_("catch requires an event")); - arg1_length =3D arg1_end + 1 - arg1_start; - - /* Try to match what we found against known event names. */ - if (strncmp (arg1_start, "signal", arg1_length) =3D=3D 0) - { - error (_("Catch of signal not yet implemented")); - } - else if (strncmp (arg1_start, "catch", arg1_length) =3D=3D 0) - { - catch_exception_command_1 (EX_EVENT_CATCH, arg1_end + 1,=20 - tempflag, from_tty); - } - else if (strncmp (arg1_start, "throw", arg1_length) =3D=3D 0) - { - catch_exception_command_1 (EX_EVENT_THROW, arg1_end + 1,=20 - tempflag, from_tty); - } - else if (strncmp (arg1_start, "thread_start", arg1_length) =3D=3D 0) - { - error (_("Catch of thread_start not yet implemented")); - } - else if (strncmp (arg1_start, "thread_exit", arg1_length) =3D=3D 0) - { - error (_("Catch of thread_exit not yet implemented")); - } - else if (strncmp (arg1_start, "thread_join", arg1_length) =3D=3D 0) - { - error (_("Catch of thread_join not yet implemented")); - } - else if (strncmp (arg1_start, "start", arg1_length) =3D=3D 0) - { - error (_("Catch of start not yet implemented")); - } - else if (strncmp (arg1_start, "exit", arg1_length) =3D=3D 0) - { - error (_("Catch of exit not yet implemented")); - } - else if (strncmp (arg1_start, "fork", arg1_length) =3D=3D 0) - { - catch_fork_command_1 (catch_fork, arg1_end + 1, tempflag, from_tty); - } - else if (strncmp (arg1_start, "vfork", arg1_length) =3D=3D 0) - { - catch_fork_command_1 (catch_vfork, arg1_end + 1, tempflag, from_tty); - } - else if (strncmp (arg1_start, "exec", arg1_length) =3D=3D 0) - { - catch_exec_command_1 (arg1_end + 1, tempflag, from_tty); - } - else if (strncmp (arg1_start, "load", arg1_length) =3D=3D 0) - { - catch_load_command_1 (arg1_end + 1, tempflag, from_tty); - } - else if (strncmp (arg1_start, "unload", arg1_length) =3D=3D 0) - { - catch_unload_command_1 (arg1_end + 1, tempflag, from_tty); - } - else if (strncmp (arg1_start, "stop", arg1_length) =3D=3D 0) - { - error (_("Catch of stop not yet implemented")); - } - else if (strncmp (arg1_start, "exception", arg1_length) =3D=3D 0) - { - catch_ada_exception_command (arg1_end + 1, tempflag, from_tty); - } - - else if (strncmp (arg1_start, "assert", arg1_length) =3D=3D 0) - { - catch_assert_command (arg1_end + 1, tempflag, from_tty); - } - - /* This doesn't appear to be an event name */ - - else - { - /* Pre-v.4.16 behaviour was to treat the argument - as the name of an exception */ - /* catch_throw_command_1 (arg1_start, tempflag, from_tty); */ - /* Now this is not allowed */ - error (_("Unknown event kind specified for catch")); - - } -} - -static void catch_command (char *arg, int from_tty) { - catch_command_1 (arg, 0, from_tty); + error (_("Catch requires an event name.")); } =0C =20 static void tcatch_command (char *arg, int from_tty) { - catch_command_1 (arg, 1, from_tty); + error (_("Catch requires an event name.")); } =20 /* Delete breakpoints by address or line. */ @@ -8222,6 +8139,34 @@ Multiple breakpoints at one place are permitted, and= useful if conditional.\n\ \n\ Do \"help breakpoints\" for info on other commands dealing with breakpoint= s." =20 +/* List of subcommands for "catch". */ +static struct cmd_list_element *catch_cmdlist; + +/* List of subcommands for "tcatch". */ +static struct cmd_list_element *tcatch_cmdlist; + +/* Like add_cmd, but add the command to both the "catch" and "tcatch" + lists, and pass some additional user data to the command function. */ +static void +add_catch_command (char *name, char *docstring, + void (*sfunc) (char *args, int from_tty, + struct cmd_list_element *command), + void *user_data_catch, + void *user_data_tcatch) +{ + struct cmd_list_element *command; + + command =3D add_cmd (name, class_breakpoint, NULL, docstring, + &catch_cmdlist); + set_cmd_sfunc (command, sfunc); + set_cmd_context (command, user_data_catch); + + command =3D add_cmd (name, class_breakpoint, NULL, docstring, + &tcatch_cmdlist); + set_cmd_sfunc (command, sfunc); + set_cmd_context (command, user_data_tcatch); +} + void _initialize_breakpoint (void) { @@ -8479,52 +8424,65 @@ Convenience variable \"$bpnum\" contains the number= of the last\n\ breakpoint set."), &maintenanceinfolist); =20 - add_com ("catch", class_breakpoint, catch_command, _("\ -Set catchpoints to catch events.\n\ -Raised signals may be caught:\n\ -\tcatch signal - all signals\n\ -\tcatch signal - a particular signal\n\ -Raised exceptions may be caught:\n\ -\tcatch throw - all exceptions, when thrown\n\ -\tcatch throw - a particular exception, when thrown\n\ -\tcatch catch - all exceptions, when caught\n\ -\tcatch catch - a particular exception, when caught\n\ -Thread or process events may be caught:\n\ -\tcatch thread_start - any threads, just after creation\n\ -\tcatch thread_exit - any threads, just before expiration\n\ -\tcatch thread_join - any threads, just after joins\n\ -Process events may be caught:\n\ -\tcatch start - any processes, just after creation\n\ -\tcatch exit - any processes, just before expiration\n\ -\tcatch fork - calls to fork()\n\ -\tcatch vfork - calls to vfork()\n\ -\tcatch exec - calls to exec()\n\ -Dynamically-linked library events may be caught:\n\ -\tcatch load - loads of any library\n\ -\tcatch load - loads of a particular library\n\ -\tcatch unload - unloads of any library\n\ -\tcatch unload - unloads of a particular library\n\ -The act of your program's execution stopping may also be caught:\n\ -\tcatch stop\n\n\ -C++ exceptions may be caught:\n\ -\tcatch throw - all exceptions, when thrown\n\ -\tcatch catch - all exceptions, when caught\n\ -Ada exceptions may be caught:\n\ -\tcatch exception - all exceptions, when raised\n\ -\tcatch exception - a particular exception, when raised\n\ -\tcatch exception unhandled - all unhandled exceptions, when raised\n\ -\tcatch assert - all failed assertions, when raised\n\ -\n\ -Do \"help set follow-fork-mode\" for info on debugging your program\n\ -after a fork or vfork is caught.\n\n\ -Do \"help breakpoints\" for info on other commands dealing with breakpoint= s.")); - - add_com ("tcatch", class_breakpoint, tcatch_command, _("\ -Set temporary catchpoints to catch events.\n\ -Args like \"catch\" command.\n\ -Like \"catch\" except the catchpoint is only temporary,\n\ -so it will be deleted when hit. Equivalent to \"catch\" followed\n\ -by using \"enable delete\" on the catchpoint number.")); + add_prefix_cmd ("catch", class_breakpoint, catch_command, _("\ +Set catchpoints to catch events."), + &catch_cmdlist, "catch ", + 0/*allow-unknown*/, &cmdlist); + + add_prefix_cmd ("tcatch", class_breakpoint, tcatch_command, _("\ +Set temporary catchpoints to catch events."), + &tcatch_cmdlist, "tcatch ", + 0/*allow-unknown*/, &cmdlist); + + /* Add catch and tcatch sub-commands. */ + add_catch_command ("catch", _("\ +Catch an exception, when caught.\n\ +With an argument, catch only exceptions with the given name."), + catch_catch_command, + CATCH_PERMANENT, + CATCH_TEMPORARY); + add_catch_command ("throw", _("\ +Catch an exception, when thrown.\n\ +With an argument, catch only exceptions with the given name."), + catch_throw_command, + CATCH_PERMANENT, + CATCH_TEMPORARY); + add_catch_command ("fork", _("Catch calls to fork."), + catch_fork_command_1, + (void *) catch_fork_permanent, + (void *) catch_fork_temporary); + add_catch_command ("vfork", _("Catch calls to vfork."), + catch_fork_command_1, + (void *) catch_vfork_permanent, + (void *) catch_vfork_temporary); + add_catch_command ("exec", _("Catch calls to exec."), + catch_exec_command_1, + CATCH_PERMANENT, + CATCH_TEMPORARY); + add_catch_command ("load", _("\ +Catch library loads.\n\ +With an argument, catch only loads of that library."), + catch_load_command_1, + CATCH_PERMANENT, + CATCH_TEMPORARY); + add_catch_command ("unload", _("\ +Catch library unloads.\n\ +With an argument, catch only unloads of that library."), + catch_unload_command_1, + CATCH_PERMANENT, + CATCH_TEMPORARY); + add_catch_command ("exception", _("\ +Catch Ada exceptions, when raised.\n\ +With an argument, catch only exceptions with the given name."), + catch_ada_exception_command, + 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."), + catch_assert_command, + CATCH_PERMANENT, + CATCH_TEMPORARY); =20 c =3D add_com ("watch", class_breakpoint, watch_command, _("\ Set a watchpoint for an expression.\n\ diff --git a/gdb/testsuite/gdb.base/help.exp b/gdb/testsuite/gdb.base/help.= exp index c427b31..bd2f9a6 100644 --- a/gdb/testsuite/gdb.base/help.exp +++ b/gdb/testsuite/gdb.base/help.exp @@ -68,7 +68,7 @@ gdb_test "help continue" "Continue program being debugged= .*" "help continue" # test help call gdb_test "help call" "Call a function.*" "help call" # test help catch -gdb_test "help catch" "Set catchpoints to catch events.*Raised signals may= be caught:.*catch signal.*all signals.*catch signal.*signame.*a particular= signal.*Raised exceptions may be caught:.*catch throw.*all exceptions, whe= n thrown.*catch throw.*exceptname.*a particular exception, when thrown.*cat= ch catch.*all exceptions, when caught.*catch catch.*exceptname.*a particula= r exception, when caught.*Thread or process events may be caught:.*catch th= read_start.*any threads, just after creation.*catch thread_exit.*any thread= s, just before expiration.*catch thread_join.*any threads, just after joins= .*catch start.*any processes, just after creation.*catch exit.*any processe= s, just before expiration.*catch fork.*calls to fork.*catch vfork.*calls to= vfork.*catch exec.*calls to exec.*Dynamically.linked library events may be= caught:.*catch load.*loads of any library.*catch load.*libname.*loads of a= particular library.*catch unload.*unloads of any library.*catch unload.*li= bname.*unloads of a particular library.*The act of your program's execution= stopping may also be caught:.*catch stop.*Do.*help set follow-fork-mode.*f= or info on debugging your program.*after a fork or vfork is caught.*Do.*hel= p breakpoints.*for info on other commands dealing with breakpoints." "help = catch" +gdb_test "help catch" "Set catchpoints to catch events.*List of catch subc= ommands:.*catch assert -- Catch failed Ada assertions.*catch catch -- Catch= an exception.*catch exception -- Catch Ada exceptions.*catch exec -- Catch= calls to exec.*catch fork -- Catch calls to fork.*catch load -- Catch libr= ary loads.*catch throw -- Catch an exception.*catch unload -- Catch library= unloads.*catch vfork -- Catch calls to vfork.*Type .help catch. followed b= y catch subcommand name for full documentation.*Type .apropos word. to sear= ch for commands related to .word..*Command name abbreviations are allowed i= f unambiguous.*" "help catch" # test help cd gdb_test "help cd" "Set working directory to DIR for debugger and program = being debugged\.\[\r\n\]+The change does not take effect for the program be= ing debugged\[\r\n\]+until the next time it is started\." "help cd" # test help clear