diff options
author | Andrew Cagney <cagney@redhat.com> | 2002-02-23 20:12:13 +0000 |
---|---|---|
committer | Andrew Cagney <cagney@redhat.com> | 2002-02-23 20:12:13 +0000 |
commit | bbaca940ebb8624260af6a0569b57cf4d32cf8c9 (patch) | |
tree | c8b3b3f60920b696964de3dcb1aa240dfd16f06a /gdb | |
parent | b8b8b04721a9b0a677ecd66aa03e3e322d988385 (diff) | |
download | binutils-bbaca940ebb8624260af6a0569b57cf4d32cf8c9.zip binutils-bbaca940ebb8624260af6a0569b57cf4d32cf8c9.tar.gz binutils-bbaca940ebb8624260af6a0569b57cf4d32cf8c9.tar.bz2 |
* cli/cli-decode.c (cmd_cfunc_eq): New function.
* command.h (cmd_cfunc_eq): Declare.
* cli/cli-decode.h (cmd_cfunc_eq): Ditto.
* cli/cli-cmds.h (is_complete_command): Change parameter to a
``struct cmd_list_element *''.
* cli/cli-cmds.c (is_complete_command): Update. Use
cmd_cfunc_eq.
* top.c (execute_command): Pass the command to
is_complete_command.
* tracepoint.c: Replace function.cfunc with cmd_cfunc_eq.
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/ChangeLog | 14 | ||||
-rw-r--r-- | gdb/cli/cli-cmds.c | 5 | ||||
-rw-r--r-- | gdb/cli/cli-cmds.h | 2 | ||||
-rw-r--r-- | gdb/cli/cli-decode.c | 7 | ||||
-rw-r--r-- | gdb/cli/cli-decode.h | 4 | ||||
-rw-r--r-- | gdb/command.h | 4 | ||||
-rw-r--r-- | gdb/top.c | 2 | ||||
-rw-r--r-- | gdb/tracepoint.c | 22 |
8 files changed, 45 insertions, 15 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 10226fa..31b2d17 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,19 @@ 2002-02-23 Andrew Cagney <ac131313@redhat.com> + * cli/cli-decode.c (cmd_cfunc_eq): New function. + * command.h (cmd_cfunc_eq): Declare. + * cli/cli-decode.h (cmd_cfunc_eq): Ditto. + + * cli/cli-cmds.h (is_complete_command): Change parameter to a + ``struct cmd_list_element *''. + * cli/cli-cmds.c (is_complete_command): Update. Use + cmd_cfunc_eq. + * top.c (execute_command): Pass the command to + is_complete_command. + * tracepoint.c: Replace function.cfunc with cmd_cfunc_eq. + +2002-02-23 Andrew Cagney <ac131313@redhat.com> + From 2002-02-20 Martin Schwidefsky <schwidefsky@de.ibm.com>: * config/s390/tm-s390.h (GDB_TARGET_IS_ESAME): Use renamed architecture defines. diff --git a/gdb/cli/cli-cmds.c b/gdb/cli/cli-cmds.c index 9d9d9ce..16cc989 100644 --- a/gdb/cli/cli-cmds.c +++ b/gdb/cli/cli-cmds.c @@ -259,9 +259,10 @@ complete_command (char *arg, int from_tty) } } -int is_complete_command (void (*func) (char *args, int from_tty)) +int +is_complete_command (struct cmd_list_element *c) { - return func == complete_command; + return cmd_cfunc_eq (c, complete_command); } /* ARGSUSED */ diff --git a/gdb/cli/cli-cmds.h b/gdb/cli/cli-cmds.h index d1515cd..a6e574e 100644 --- a/gdb/cli/cli-cmds.h +++ b/gdb/cli/cli-cmds.h @@ -105,7 +105,7 @@ void init_cmd_lists (void); void init_cli_cmds (void); -int is_complete_command (void (*func) (char *args, int from_tty)); +int is_complete_command (struct cmd_list_element *cmd); /* Exported to gdb/main.c */ diff --git a/gdb/cli/cli-decode.c b/gdb/cli/cli-decode.c index d64b2f6..a13b7b8 100644 --- a/gdb/cli/cli-decode.c +++ b/gdb/cli/cli-decode.c @@ -79,6 +79,13 @@ set_cmd_sfunc (struct cmd_list_element *cmd, cmd->function.sfunc = sfunc; /* Ok. */ } +int +cmd_cfunc_eq (struct cmd_list_element *cmd, + void (*cfunc) (char *args, int from_tty)) +{ + return cmd->func == do_cfunc && cmd->function.cfunc == cfunc; +} + /* Add element named NAME. CLASS is the top level category into which commands are broken down diff --git a/gdb/cli/cli-decode.h b/gdb/cli/cli-decode.h index 6c7c22b..e4b7c55 100644 --- a/gdb/cli/cli-decode.h +++ b/gdb/cli/cli-decode.h @@ -286,6 +286,10 @@ extern void set_cmd_sfunc (struct cmd_list_element *cmd, void (*sfunc) (char *args, int from_tty, struct cmd_list_element * c)); +/* HACK: cagney/2002-02-23: Code, mostly in tracepoints.c, grubs + around in cmd objects to test the value of the commands sfunc(). */ +extern int cmd_cfunc_eq (struct cmd_list_element *cmd, + void (*cfunc) (char *args, int from_tty)); extern struct cmd_list_element *lookup_cmd (char **, struct cmd_list_element *, char *, diff --git a/gdb/command.h b/gdb/command.h index c7d7b5e..9037b2e 100644 --- a/gdb/command.h +++ b/gdb/command.h @@ -292,6 +292,10 @@ extern void set_cmd_sfunc (struct cmd_list_element *cmd, void (*sfunc) (char *args, int from_tty, struct cmd_list_element * c)); +/* HACK: cagney/2002-02-23: Code, mostly in tracepoints.c, grubs + around in cmd objects to test the value of the commands sfunc(). */ +extern int cmd_cfunc_eq (struct cmd_list_element *cmd, + void (*cfunc) (char *args, int from_tty)); extern struct cmd_list_element *lookup_cmd (char **, struct cmd_list_element *, char *, @@ -684,7 +684,7 @@ execute_command (char *p, int from_tty) command. */ if (arg && c->type != set_cmd - && !is_complete_command (c->function.cfunc)) + && !is_complete_command (c)) { p = arg + strlen (arg) - 1; while (p >= arg && (*p == ' ' || *p == '\t')) diff --git a/gdb/tracepoint.c b/gdb/tracepoint.c index 1eb01cc..860b483 100644 --- a/gdb/tracepoint.c +++ b/gdb/tracepoint.c @@ -939,7 +939,7 @@ validate_actionline (char **line, struct tracepoint *t) return BADLINE; } - if (c->function.cfunc == collect_pseudocommand) + if (cmd_cfunc_eq (c, collect_pseudocommand)) { struct agent_expr *aexpr; struct agent_reqs areqs; @@ -1006,7 +1006,7 @@ validate_actionline (char **line, struct tracepoint *t) while (p && *p++ == ','); return GENERIC; } - else if (c->function.cfunc == while_stepping_pseudocommand) + else if (cmd_cfunc_eq (c, while_stepping_pseudocommand)) { char *steparg; /* in case warning is necessary */ @@ -1022,7 +1022,7 @@ validate_actionline (char **line, struct tracepoint *t) } return STEPPING; } - else if (c->function.cfunc == end_actions_pseudocommand) + else if (cmd_cfunc_eq (c, end_actions_pseudocommand)) return END; else { @@ -1520,7 +1520,7 @@ encode_actions (struct tracepoint *t, char ***tdp_actions, if (cmd == 0) error ("Bad action list item: %s", action_exp); - if (cmd->function.cfunc == collect_pseudocommand) + if (cmd_cfunc_eq (cmd, collect_pseudocommand)) { do { /* repeat over a comma-separated list */ @@ -1630,11 +1630,11 @@ encode_actions (struct tracepoint *t, char ***tdp_actions, } while (action_exp && *action_exp++ == ','); } /* if */ - else if (cmd->function.cfunc == while_stepping_pseudocommand) + else if (cmd_cfunc_eq (cmd, while_stepping_pseudocommand)) { collect = &stepping_list; } - else if (cmd->function.cfunc == end_actions_pseudocommand) + else if (cmd_cfunc_eq (cmd, end_actions_pseudocommand)) { if (collect == &stepping_list) /* end stepping actions */ collect = &tracepoint_list; @@ -2315,9 +2315,9 @@ tracepoint_save_command (char *args, int from_tty) cmd = lookup_cmd (&actionline, cmdlist, "", -1, 1); if (cmd == 0) error ("Bad action list item: %s", actionline); - if (cmd->function.cfunc == while_stepping_pseudocommand) + if (cmd_cfunc_eq (cmd, while_stepping_pseudocommand)) indent = i2; - else if (cmd->function.cfunc == end_actions_pseudocommand) + else if (cmd_cfunc_eq (cmd, end_actions_pseudocommand)) indent = i1; } } @@ -2534,11 +2534,11 @@ trace_dump_command (char *args, int from_tty) if (cmd == 0) error ("Bad action list item: %s", action_exp); - if (cmd->function.cfunc == while_stepping_pseudocommand) + if (cmd_cfunc_eq (cmd, while_stepping_pseudocommand)) stepping_actions = 1; - else if (cmd->function.cfunc == end_actions_pseudocommand) + else if (cmd_cfunc_eq (cmd, end_actions_pseudocommand)) stepping_actions = 0; - else if (cmd->function.cfunc == collect_pseudocommand) + else if (cmd_cfunc_eq (cmd, collect_pseudocommand)) { /* Display the collected data. For the trap frame, display only what was collected at the trap. |