* hppa-tdep.c (_initialize_hppa_tdep): Move function body
to end of file, to be more consistent with the pratice followed by other targets.
This commit is contained in:
parent
f9418c0f19
commit
4facf7e890
2 changed files with 52 additions and 45 deletions
|
@ -1,3 +1,9 @@
|
|||
2002-11-06 Joel Brobecker <brobecker@gnat.com>
|
||||
|
||||
* hppa-tdep.c (_initialize_hppa_tdep): Move function body
|
||||
to end of file, to be more consistent with the pratice followed
|
||||
by other targets.
|
||||
|
||||
2002-11-06 Andrew Cagney <ac131313@redhat.com>
|
||||
|
||||
* infcmd.c: Include "reggroups.h" and <ctype.h>.
|
||||
|
|
|
@ -4674,51 +4674,6 @@ hppa_skip_permanent_breakpoint (void)
|
|||
/* We can leave the tail's space the same, since there's no jump. */
|
||||
}
|
||||
|
||||
void
|
||||
_initialize_hppa_tdep (void)
|
||||
{
|
||||
struct cmd_list_element *c;
|
||||
void break_at_finish_command (char *arg, int from_tty);
|
||||
void tbreak_at_finish_command (char *arg, int from_tty);
|
||||
void break_at_finish_at_depth_command (char *arg, int from_tty);
|
||||
|
||||
tm_print_insn = print_insn_hppa;
|
||||
|
||||
add_cmd ("unwind", class_maintenance, unwind_command,
|
||||
"Print unwind table entry at given address.",
|
||||
&maintenanceprintlist);
|
||||
|
||||
deprecate_cmd (add_com ("xbreak", class_breakpoint,
|
||||
break_at_finish_command,
|
||||
concat ("Set breakpoint at procedure exit. \n\
|
||||
Argument may be function name, or \"*\" and an address.\n\
|
||||
If function is specified, break at end of code for that function.\n\
|
||||
If an address is specified, break at the end of the function that contains \n\
|
||||
that exact address.\n",
|
||||
"With no arg, uses current execution address of selected stack frame.\n\
|
||||
This is useful for breaking on return to a stack frame.\n\
|
||||
\n\
|
||||
Multiple breakpoints at one place are permitted, and useful if conditional.\n\
|
||||
\n\
|
||||
Do \"help breakpoints\" for info on other commands dealing with breakpoints.", NULL)), NULL);
|
||||
deprecate_cmd (add_com_alias ("xb", "xbreak", class_breakpoint, 1), NULL);
|
||||
deprecate_cmd (add_com_alias ("xbr", "xbreak", class_breakpoint, 1), NULL);
|
||||
deprecate_cmd (add_com_alias ("xbre", "xbreak", class_breakpoint, 1), NULL);
|
||||
deprecate_cmd (add_com_alias ("xbrea", "xbreak", class_breakpoint, 1), NULL);
|
||||
|
||||
deprecate_cmd (c = add_com ("txbreak", class_breakpoint,
|
||||
tbreak_at_finish_command,
|
||||
"Set temporary breakpoint at procedure exit. Either there should\n\
|
||||
be no argument or the argument must be a depth.\n"), NULL);
|
||||
set_cmd_completer (c, location_completer);
|
||||
|
||||
if (xdb_commands)
|
||||
deprecate_cmd (add_com ("bx", class_breakpoint,
|
||||
break_at_finish_at_depth_command,
|
||||
"Set breakpoint at procedure exit. Either there should\n\
|
||||
be no argument or the argument must be a depth.\n"), NULL);
|
||||
}
|
||||
|
||||
/* Copy the function value from VALBUF into the proper location
|
||||
for a function return.
|
||||
|
||||
|
@ -4768,3 +4723,49 @@ hppa_extract_return_value (struct type *type, char *regbuf, char *valbuf)
|
|||
: (4 - TYPE_LENGTH (type)))),
|
||||
TYPE_LENGTH (type));
|
||||
}
|
||||
|
||||
void
|
||||
_initialize_hppa_tdep (void)
|
||||
{
|
||||
struct cmd_list_element *c;
|
||||
void break_at_finish_command (char *arg, int from_tty);
|
||||
void tbreak_at_finish_command (char *arg, int from_tty);
|
||||
void break_at_finish_at_depth_command (char *arg, int from_tty);
|
||||
|
||||
tm_print_insn = print_insn_hppa;
|
||||
|
||||
add_cmd ("unwind", class_maintenance, unwind_command,
|
||||
"Print unwind table entry at given address.",
|
||||
&maintenanceprintlist);
|
||||
|
||||
deprecate_cmd (add_com ("xbreak", class_breakpoint,
|
||||
break_at_finish_command,
|
||||
concat ("Set breakpoint at procedure exit. \n\
|
||||
Argument may be function name, or \"*\" and an address.\n\
|
||||
If function is specified, break at end of code for that function.\n\
|
||||
If an address is specified, break at the end of the function that contains \n\
|
||||
that exact address.\n",
|
||||
"With no arg, uses current execution address of selected stack frame.\n\
|
||||
This is useful for breaking on return to a stack frame.\n\
|
||||
\n\
|
||||
Multiple breakpoints at one place are permitted, and useful if conditional.\n\
|
||||
\n\
|
||||
Do \"help breakpoints\" for info on other commands dealing with breakpoints.", NULL)), NULL);
|
||||
deprecate_cmd (add_com_alias ("xb", "xbreak", class_breakpoint, 1), NULL);
|
||||
deprecate_cmd (add_com_alias ("xbr", "xbreak", class_breakpoint, 1), NULL);
|
||||
deprecate_cmd (add_com_alias ("xbre", "xbreak", class_breakpoint, 1), NULL);
|
||||
deprecate_cmd (add_com_alias ("xbrea", "xbreak", class_breakpoint, 1), NULL);
|
||||
|
||||
deprecate_cmd (c = add_com ("txbreak", class_breakpoint,
|
||||
tbreak_at_finish_command,
|
||||
"Set temporary breakpoint at procedure exit. Either there should\n\
|
||||
be no argument or the argument must be a depth.\n"), NULL);
|
||||
set_cmd_completer (c, location_completer);
|
||||
|
||||
if (xdb_commands)
|
||||
deprecate_cmd (add_com ("bx", class_breakpoint,
|
||||
break_at_finish_at_depth_command,
|
||||
"Set breakpoint at procedure exit. Either there should\n\
|
||||
be no argument or the argument must be a depth.\n"), NULL);
|
||||
}
|
||||
|
||||
|
|
Loading…
Reference in a new issue