This is the mail archive of the
gdb-patches@sourceware.cygnus.com
mailing list for the GDB project.
fatal() -> internal_error() jumbo patch
- To: gdb-patches@sourceware.cygnus.com
- Subject: fatal() -> internal_error() jumbo patch
- From: Andrew Cagney <ac131313@cygnus.com>
- Date: Fri, 06 Aug 1999 19:22:38 +1000
- DJ-Gateway: from newsgroup cygnus.patches.gdb
- Newsgroups: cygnus.patches.gdb
- Organization: Cygnus Solutions
Hello,
I'm looking for comments. Mainly on the new function internal_error().
The new function asks the user before dumping core (quiting GDB) this
gives the user a fighting chance of still being able to salvage
something from a debug session.
If things really go wrong (it detects recursion) it still tries to get
some sort of message out.
Andrew
Fri Aug 6 17:17:28 1999 Andrew Cagney <cagney@b1.cygnus.com>
* defs.h (fatal): Delete declaration.
(internal_error): Declare.
* utils.c (nomem): Call internal_error instead of fatal.
(fatal_dump_core): Delete.
(malloc_botch): Print message direct to stderr.
(fatal): Delete definition.
* utils.c (internal_error): Define.
* gdbarch.h, gdbarch.c, hppah-nat.c, ch-exp.c, dsrec.c, sh-tdep.c,
infptrace.c, f-lang.c, symm-nat.c, top.c, m3-nat.c, v850-tdep.c,
remote-vx.c, remote-sim.c, remote-mips.c, source.c, infcmd.c,
findvar.c, remote.c: Replace fatal with call to internal_error.
Index: a29k-tdep.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/a29k-tdep.c,v
retrieving revision 2.30
diff -p -r2.30 a29k-tdep.c
*** a29k-tdep.c 1999/07/07 23:51:02 2.30
--- a29k-tdep.c 1999/08/06 09:15:48
*************** setup_arbitrary_frame (argc, argv)
*** 922,928 ****
frame = create_new_frame (argv[0], argv[1]);
if (!frame)
! fatal ("internal: create_new_frame returned invalid frame id");
/* Creating a new frame munges the `frame' value from the current
GR1, so we restore it again here. FIXME, untangle all this
--- 922,928 ----
frame = create_new_frame (argv[0], argv[1]);
if (!frame)
! internal_error ("create_new_frame returned invalid frame id");
/* Creating a new frame munges the `frame' value from the current
GR1, so we restore it again here. FIXME, untangle all this
Index: arm-xdep.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/arm-xdep.c,v
retrieving revision 1.17
diff -p -r1.17 arm-xdep.c
*** arm-xdep.c 1999/07/07 23:51:02 1.17
--- arm-xdep.c 1999/08/06 09:15:48
*************** xfer_core_file (memaddr, myaddr, len)
*** 538,544 ****
{
/* Address did not classify into one of the known ranges.
This shouldn't happen; we catch the endpoints. */
! fatal ("Internal: Bad case logic in xfer_core_file.");
}
/* Now we know which file to use.
--- 538,544 ----
{
/* Address did not classify into one of the known ranges.
This shouldn't happen; we catch the endpoints. */
! internal_error ("Bad case logic in xfer_core_file.");
}
/* Now we know which file to use.
Index: ch-exp.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/ch-exp.c,v
retrieving revision 2.19
diff -p -r2.19 ch-exp.c
*** ch-exp.c 1999/07/07 23:51:03 2.19
--- ch-exp.c 1999/08/06 09:15:52
*************** peek_token_ (i)
*** 217,223 ****
int i;
{
if (i > MAX_LOOK_AHEAD)
! fatal ("internal error - too much lookahead");
if (terminal_buffer[i] == TOKEN_NOT_READ)
{
terminal_buffer[i] = ch_lex ();
--- 217,223 ----
int i;
{
if (i > MAX_LOOK_AHEAD)
! internal_error ("ch-exp.c - too much lookahead");
if (terminal_buffer[i] == TOKEN_NOT_READ)
{
terminal_buffer[i] = ch_lex ();
*************** pushback_token (code, node)
*** 235,241 ****
{
int i;
if (terminal_buffer[MAX_LOOK_AHEAD] != TOKEN_NOT_READ)
! fatal ("internal error - cannot pushback token");
for (i = MAX_LOOK_AHEAD; i > 0; i--)
{
terminal_buffer[i] = terminal_buffer[i - 1];
--- 235,241 ----
{
int i;
if (terminal_buffer[MAX_LOOK_AHEAD] != TOKEN_NOT_READ)
! internal_error ("ch-exp.c - cannot pushback token");
for (i = MAX_LOOK_AHEAD; i > 0; i--)
{
terminal_buffer[i] = terminal_buffer[i - 1];
*************** require (token)
*** 269,277 ****
{
if (PEEK_TOKEN () != token)
{
! char buf[80];
! sprintf (buf, "internal parser error - expected token %d", (int) token);
! fatal (buf);
}
FORWARD_TOKEN ();
}
--- 269,275 ----
{
if (PEEK_TOKEN () != token)
{
! internal_error ("ch-exp.c - expected token %d", (int) token);
}
FORWARD_TOKEN ();
}
Index: defs.h
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/defs.h,v
retrieving revision 1.240
diff -p -r1.240 defs.h
*** defs.h 1999/07/11 16:26:21 1.240
--- defs.h 1999/08/06 09:15:56
*************** extern NORETURN void error PARAMS((const
*** 823,829 ****
extern void error_begin PARAMS ((void));
! extern NORETURN void fatal PARAMS((char *, ...)) ATTR_NORETURN;
extern NORETURN void nomem PARAMS ((long)) ATTR_NORETURN;
--- 823,829 ----
extern void error_begin PARAMS ((void));
! extern NORETURN void internal_error (char *, ...) ATTR_NORETURN;
extern NORETURN void nomem PARAMS ((long)) ATTR_NORETURN;
Index: dsrec.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/dsrec.c,v
retrieving revision 1.16
diff -p -r1.16 dsrec.c
*** dsrec.c 1999/07/07 23:51:05 1.16
--- dsrec.c 1999/08/06 09:15:56
*************** make_srec (srec, targ_addr, abfd, sect,
*** 257,264 ****
else if (tmp & SREC_4_BYTE_ADDR)
addr_size = 4;
else
! fatal ("make_srec: Bad address (0x%x), or bad flags (0x%x).",
! targ_addr, flags);
/* Now that we know the address size, we can figure out how much
data this record can hold. */
--- 257,264 ----
else if (tmp & SREC_4_BYTE_ADDR)
addr_size = 4;
else
! internal_error ("make_srec: Bad address (0x%x), or bad flags (0x%x).",
! targ_addr, flags);
/* Now that we know the address size, we can figure out how much
data this record can hold. */
Index: f-lang.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/f-lang.c,v
retrieving revision 2.18
diff -p -r2.18 f-lang.c
*** f-lang.c 1999/07/07 23:51:07 2.18
--- f-lang.c 1999/08/06 09:15:58
*************** get_bf_for_fcn (the_function)
*** 920,926 ****
item at the head of the queue is the one you want) */
if (saved_bf_list == NULL)
! fatal ("cannot get .bf node off empty list");
if (current_head_bf_list != NULL)
if (current_head_bf_list->symnum_fcn == the_function)
--- 920,926 ----
item at the head of the queue is the one you want) */
if (saved_bf_list == NULL)
! internal_error ("cannot get .bf node off empty list");
if (current_head_bf_list != NULL)
if (current_head_bf_list->symnum_fcn == the_function)
Index: findvar.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/findvar.c,v
retrieving revision 1.105
diff -p -r1.105 findvar.c
*** findvar.c 1999/07/07 23:51:07 1.105
--- findvar.c 1999/08/06 09:16:01
*************** value_of_register (regnum)
*** 606,614 ****
memcpy (VALUE_CONTENTS_RAW (reg_val), raw_buffer,
REGISTER_RAW_SIZE (regnum));
else
! fatal ("Register \"%s\" (%d) has conflicting raw (%d) and virtual (%d) size",
! REGISTER_NAME (regnum), regnum,
! REGISTER_RAW_SIZE (regnum), REGISTER_VIRTUAL_SIZE (regnum));
VALUE_LVAL (reg_val) = lval;
VALUE_ADDRESS (reg_val) = addr;
VALUE_REGNO (reg_val) = regnum;
--- 606,616 ----
memcpy (VALUE_CONTENTS_RAW (reg_val), raw_buffer,
REGISTER_RAW_SIZE (regnum));
else
! internal_error ("Register \"%s\" (%d) has conflicting raw (%d) and virtual (%d) size",
! REGISTER_NAME (regnum),
! regnum,
! REGISTER_RAW_SIZE (regnum),
! REGISTER_VIRTUAL_SIZE (regnum));
VALUE_LVAL (reg_val) = lval;
VALUE_ADDRESS (reg_val) = addr;
VALUE_REGNO (reg_val) = regnum;
*************** generic_target_read_pc (pid)
*** 1025,1031 ****
return pc_val;
}
#endif
! fatal ("generic_target_read_pc");
return 0;
}
--- 1027,1033 ----
return pc_val;
}
#endif
! internal_error ("generic_target_read_pc");
return 0;
}
*************** generic_target_write_pc (pc, pid)
*** 1073,1079 ****
#endif
#endif
#else
! fatal ("generic_target_write_pc");
#endif
}
--- 1075,1081 ----
#endif
#endif
#else
! internal_error ("generic_target_write_pc");
#endif
}
*************** generic_target_read_sp ()
*** 1113,1119 ****
if (SP_REGNUM >= 0)
return read_register (SP_REGNUM);
#endif
! fatal ("generic_target_read_sp");
}
CORE_ADDR
--- 1115,1121 ----
if (SP_REGNUM >= 0)
return read_register (SP_REGNUM);
#endif
! internal_error ("generic_target_read_sp");
}
CORE_ADDR
*************** generic_target_write_sp (val)
*** 1137,1143 ****
return;
}
#endif
! fatal ("generic_target_write_sp");
}
void
--- 1139,1145 ----
return;
}
#endif
! internal_error ("generic_target_write_sp");
}
void
*************** generic_target_read_fp ()
*** 1158,1164 ****
if (FP_REGNUM >= 0)
return read_register (FP_REGNUM);
#endif
! fatal ("generic_target_read_fp");
}
CORE_ADDR
--- 1160,1166 ----
if (FP_REGNUM >= 0)
return read_register (FP_REGNUM);
#endif
! internal_error ("generic_target_read_fp");
}
CORE_ADDR
*************** generic_target_write_fp (val)
*** 1182,1188 ****
return;
}
#endif
! fatal ("generic_target_write_fp");
}
void
--- 1184,1190 ----
return;
}
#endif
! internal_error ("generic_target_write_fp");
}
void
*************** value_from_register (type, regnum, frame
*** 1609,1615 ****
VALUE_ADDRESS (v) = first_addr;
}
else
! fatal ("value_from_register: Value not stored anywhere!");
VALUE_OPTIMIZED_OUT (v) = optim;
--- 1611,1617 ----
VALUE_ADDRESS (v) = first_addr;
}
else
! internal_error ("value_from_register: Value not stored anywhere!");
VALUE_OPTIMIZED_OUT (v) = optim;
Index: gdbarch.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/gdbarch.c,v
retrieving revision 2.52
diff -p -r2.52 gdbarch.c
*** gdbarch.c 1999/08/06 08:45:26 2.52
--- gdbarch.c 1999/08/06 09:16:05
*************** verify_gdbarch (gdbarch)
*** 338,572 ****
return;
/* fundamental */
if (gdbarch->byte_order == 0)
! fatal ("verify_gdbarch: byte-order unset");
if (gdbarch->bfd_arch_info == NULL)
! fatal ("verify_gdbarch: bfd_arch_info unset");
/* Check those that need to be defined for the given multi-arch level. */
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->ptr_bit == 0))
! fatal ("gdbarch: verify_gdbarch: ptr_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->short_bit == 0))
! fatal ("gdbarch: verify_gdbarch: short_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->int_bit == 0))
! fatal ("gdbarch: verify_gdbarch: int_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->long_bit == 0))
! fatal ("gdbarch: verify_gdbarch: long_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->long_long_bit == 0))
! fatal ("gdbarch: verify_gdbarch: long_long_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->float_bit == 0))
! fatal ("gdbarch: verify_gdbarch: float_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->double_bit == 0))
! fatal ("gdbarch: verify_gdbarch: double_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->long_double_bit == 0))
! fatal ("gdbarch: verify_gdbarch: long_double_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->read_pc == 0))
! fatal ("gdbarch: verify_gdbarch: read_pc invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->write_pc == 0))
! fatal ("gdbarch: verify_gdbarch: write_pc invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->read_fp == 0))
! fatal ("gdbarch: verify_gdbarch: read_fp invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->write_fp == 0))
! fatal ("gdbarch: verify_gdbarch: write_fp invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->read_sp == 0))
! fatal ("gdbarch: verify_gdbarch: read_sp invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->write_sp == 0))
! fatal ("gdbarch: verify_gdbarch: write_sp invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->num_regs == -1))
! fatal ("gdbarch: verify_gdbarch: num_regs invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->sp_regnum == -1))
! fatal ("gdbarch: verify_gdbarch: sp_regnum invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->fp_regnum == -1))
! fatal ("gdbarch: verify_gdbarch: fp_regnum invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->pc_regnum == -1))
! fatal ("gdbarch: verify_gdbarch: pc_regnum invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_name == 0))
! fatal ("gdbarch: verify_gdbarch: register_name invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_size == -1))
! fatal ("gdbarch: verify_gdbarch: register_size invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_bytes == -1))
! fatal ("gdbarch: verify_gdbarch: register_bytes invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_byte == 0))
! fatal ("gdbarch: verify_gdbarch: register_byte invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_raw_size == 0))
! fatal ("gdbarch: verify_gdbarch: register_raw_size invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->max_register_raw_size == -1))
! fatal ("gdbarch: verify_gdbarch: max_register_raw_size invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_virtual_size == 0))
! fatal ("gdbarch: verify_gdbarch: register_virtual_size invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->max_register_virtual_size == -1))
! fatal ("gdbarch: verify_gdbarch: max_register_virtual_size invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_virtual_type == 0))
! fatal ("gdbarch: verify_gdbarch: register_virtual_type invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->use_generic_dummy_frames == -1))
! fatal ("gdbarch: verify_gdbarch: use_generic_dummy_frames invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_location == 0))
! fatal ("gdbarch: verify_gdbarch: call_dummy_location invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_location == AT_ENTRY_POINT && gdbarch->call_dummy_address == 0))
! fatal ("gdbarch: verify_gdbarch: call_dummy_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_start_offset == -1))
! fatal ("gdbarch: verify_gdbarch: call_dummy_start_offset invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_breakpoint_offset == -1))
! fatal ("gdbarch: verify_gdbarch: call_dummy_breakpoint_offset invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->call_dummy_breakpoint_offset_p == -1))
! fatal ("gdbarch: verify_gdbarch: call_dummy_breakpoint_offset_p invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_length == -1))
! fatal ("gdbarch: verify_gdbarch: call_dummy_length invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->pc_in_call_dummy == 0))
! fatal ("gdbarch: verify_gdbarch: pc_in_call_dummy invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->call_dummy_p == -1))
! fatal ("gdbarch: verify_gdbarch: call_dummy_p invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->call_dummy_stack_adjust_p == -1))
! fatal ("gdbarch: verify_gdbarch: call_dummy_stack_adjust_p invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_stack_adjust_p && gdbarch->call_dummy_stack_adjust == 0))
! fatal ("gdbarch: verify_gdbarch: call_dummy_stack_adjust invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->fix_call_dummy == 0))
! fatal ("gdbarch: verify_gdbarch: fix_call_dummy invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->get_saved_register == 0))
! fatal ("gdbarch: verify_gdbarch: get_saved_register invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->register_convertible == 0))
! fatal ("gdbarch: verify_gdbarch: register_convertible invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_convert_to_virtual == 0))
! fatal ("gdbarch: verify_gdbarch: register_convert_to_virtual invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_convert_to_raw == 0))
! fatal ("gdbarch: verify_gdbarch: register_convert_to_raw invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->extract_return_value == 0))
! fatal ("gdbarch: verify_gdbarch: extract_return_value invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->push_arguments == 0))
! fatal ("gdbarch: verify_gdbarch: push_arguments invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->push_dummy_frame == 0))
! fatal ("gdbarch: verify_gdbarch: push_dummy_frame invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->push_return_address == 0))
! fatal ("gdbarch: verify_gdbarch: push_return_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->pop_frame == 0))
! fatal ("gdbarch: verify_gdbarch: pop_frame invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_make_daddr == 0))
! fatal ("gdbarch: verify_gdbarch: d10v_make_daddr invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_make_iaddr == 0))
! fatal ("gdbarch: verify_gdbarch: d10v_make_iaddr invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_daddr_p == 0))
! fatal ("gdbarch: verify_gdbarch: d10v_daddr_p invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_iaddr_p == 0))
! fatal ("gdbarch: verify_gdbarch: d10v_iaddr_p invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_convert_daddr_to_raw == 0))
! fatal ("gdbarch: verify_gdbarch: d10v_convert_daddr_to_raw invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_convert_iaddr_to_raw == 0))
! fatal ("gdbarch: verify_gdbarch: d10v_convert_iaddr_to_raw invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->store_struct_return == 0))
! fatal ("gdbarch: verify_gdbarch: store_struct_return invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->store_return_value == 0))
! fatal ("gdbarch: verify_gdbarch: store_return_value invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->extract_struct_value_address == 0))
! fatal ("gdbarch: verify_gdbarch: extract_struct_value_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->use_struct_convention == 0))
! fatal ("gdbarch: verify_gdbarch: use_struct_convention invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_init_saved_regs == 0))
! fatal ("gdbarch: verify_gdbarch: frame_init_saved_regs invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->init_extra_frame_info == 0))
! fatal ("gdbarch: verify_gdbarch: init_extra_frame_info invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->skip_prologue == 0))
! fatal ("gdbarch: verify_gdbarch: skip_prologue invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->inner_than == 0))
! fatal ("gdbarch: verify_gdbarch: inner_than invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->breakpoint_from_pc == 0))
! fatal ("gdbarch: verify_gdbarch: breakpoint_from_pc invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->decr_pc_after_break == -1))
! fatal ("gdbarch: verify_gdbarch: decr_pc_after_break invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->function_start_offset == -1))
! fatal ("gdbarch: verify_gdbarch: function_start_offset invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->remote_translate_xfer_address == 0))
! fatal ("gdbarch: verify_gdbarch: remote_translate_xfer_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_args_skip == -1))
! fatal ("gdbarch: verify_gdbarch: frame_args_skip invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frameless_function_invocation == 0))
! fatal ("gdbarch: verify_gdbarch: frameless_function_invocation invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_chain == 0))
! fatal ("gdbarch: verify_gdbarch: frame_chain invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->frame_chain_valid == 0))
! fatal ("gdbarch: verify_gdbarch: frame_chain_valid invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_saved_pc == 0))
! fatal ("gdbarch: verify_gdbarch: frame_saved_pc invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_args_address == 0))
! fatal ("gdbarch: verify_gdbarch: frame_args_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_locals_address == 0))
! fatal ("gdbarch: verify_gdbarch: frame_locals_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->saved_pc_after_call == 0))
! fatal ("gdbarch: verify_gdbarch: saved_pc_after_call invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_num_args == 0))
! fatal ("gdbarch: verify_gdbarch: frame_num_args invalid");
}
--- 338,572 ----
return;
/* fundamental */
if (gdbarch->byte_order == 0)
! internal_error ("verify_gdbarch: byte-order unset");
if (gdbarch->bfd_arch_info == NULL)
! internal_error ("verify_gdbarch: bfd_arch_info unset");
/* Check those that need to be defined for the given multi-arch level. */
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->ptr_bit == 0))
! internal_error ("gdbarch: verify_gdbarch: ptr_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->short_bit == 0))
! internal_error ("gdbarch: verify_gdbarch: short_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->int_bit == 0))
! internal_error ("gdbarch: verify_gdbarch: int_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->long_bit == 0))
! internal_error ("gdbarch: verify_gdbarch: long_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->long_long_bit == 0))
! internal_error ("gdbarch: verify_gdbarch: long_long_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->float_bit == 0))
! internal_error ("gdbarch: verify_gdbarch: float_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->double_bit == 0))
! internal_error ("gdbarch: verify_gdbarch: double_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->long_double_bit == 0))
! internal_error ("gdbarch: verify_gdbarch: long_double_bit invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->read_pc == 0))
! internal_error ("gdbarch: verify_gdbarch: read_pc invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->write_pc == 0))
! internal_error ("gdbarch: verify_gdbarch: write_pc invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->read_fp == 0))
! internal_error ("gdbarch: verify_gdbarch: read_fp invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->write_fp == 0))
! internal_error ("gdbarch: verify_gdbarch: write_fp invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->read_sp == 0))
! internal_error ("gdbarch: verify_gdbarch: read_sp invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->write_sp == 0))
! internal_error ("gdbarch: verify_gdbarch: write_sp invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->num_regs == -1))
! internal_error ("gdbarch: verify_gdbarch: num_regs invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->sp_regnum == -1))
! internal_error ("gdbarch: verify_gdbarch: sp_regnum invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->fp_regnum == -1))
! internal_error ("gdbarch: verify_gdbarch: fp_regnum invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->pc_regnum == -1))
! internal_error ("gdbarch: verify_gdbarch: pc_regnum invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_name == 0))
! internal_error ("gdbarch: verify_gdbarch: register_name invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_size == -1))
! internal_error ("gdbarch: verify_gdbarch: register_size invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_bytes == -1))
! internal_error ("gdbarch: verify_gdbarch: register_bytes invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_byte == 0))
! internal_error ("gdbarch: verify_gdbarch: register_byte invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_raw_size == 0))
! internal_error ("gdbarch: verify_gdbarch: register_raw_size invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->max_register_raw_size == -1))
! internal_error ("gdbarch: verify_gdbarch: max_register_raw_size invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_virtual_size == 0))
! internal_error ("gdbarch: verify_gdbarch: register_virtual_size invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->max_register_virtual_size == -1))
! internal_error ("gdbarch: verify_gdbarch: max_register_virtual_size invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_virtual_type == 0))
! internal_error ("gdbarch: verify_gdbarch: register_virtual_type invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->use_generic_dummy_frames == -1))
! internal_error ("gdbarch: verify_gdbarch: use_generic_dummy_frames invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_location == 0))
! internal_error ("gdbarch: verify_gdbarch: call_dummy_location invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_location == AT_ENTRY_POINT && gdbarch->call_dummy_address == 0))
! internal_error ("gdbarch: verify_gdbarch: call_dummy_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_start_offset == -1))
! internal_error ("gdbarch: verify_gdbarch: call_dummy_start_offset invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_breakpoint_offset == -1))
! internal_error ("gdbarch: verify_gdbarch: call_dummy_breakpoint_offset invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->call_dummy_breakpoint_offset_p == -1))
! internal_error ("gdbarch: verify_gdbarch: call_dummy_breakpoint_offset_p invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_length == -1))
! internal_error ("gdbarch: verify_gdbarch: call_dummy_length invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->pc_in_call_dummy == 0))
! internal_error ("gdbarch: verify_gdbarch: pc_in_call_dummy invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->call_dummy_p == -1))
! internal_error ("gdbarch: verify_gdbarch: call_dummy_p invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->call_dummy_stack_adjust_p == -1))
! internal_error ("gdbarch: verify_gdbarch: call_dummy_stack_adjust_p invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->call_dummy_stack_adjust_p && gdbarch->call_dummy_stack_adjust == 0))
! internal_error ("gdbarch: verify_gdbarch: call_dummy_stack_adjust invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->fix_call_dummy == 0))
! internal_error ("gdbarch: verify_gdbarch: fix_call_dummy invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->get_saved_register == 0))
! internal_error ("gdbarch: verify_gdbarch: get_saved_register invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->register_convertible == 0))
! internal_error ("gdbarch: verify_gdbarch: register_convertible invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_convert_to_virtual == 0))
! internal_error ("gdbarch: verify_gdbarch: register_convert_to_virtual invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->register_convert_to_raw == 0))
! internal_error ("gdbarch: verify_gdbarch: register_convert_to_raw invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->extract_return_value == 0))
! internal_error ("gdbarch: verify_gdbarch: extract_return_value invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->push_arguments == 0))
! internal_error ("gdbarch: verify_gdbarch: push_arguments invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->push_dummy_frame == 0))
! internal_error ("gdbarch: verify_gdbarch: push_dummy_frame invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->push_return_address == 0))
! internal_error ("gdbarch: verify_gdbarch: push_return_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->pop_frame == 0))
! internal_error ("gdbarch: verify_gdbarch: pop_frame invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_make_daddr == 0))
! internal_error ("gdbarch: verify_gdbarch: d10v_make_daddr invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_make_iaddr == 0))
! internal_error ("gdbarch: verify_gdbarch: d10v_make_iaddr invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_daddr_p == 0))
! internal_error ("gdbarch: verify_gdbarch: d10v_daddr_p invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_iaddr_p == 0))
! internal_error ("gdbarch: verify_gdbarch: d10v_iaddr_p invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_convert_daddr_to_raw == 0))
! internal_error ("gdbarch: verify_gdbarch: d10v_convert_daddr_to_raw invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->d10v_convert_iaddr_to_raw == 0))
! internal_error ("gdbarch: verify_gdbarch: d10v_convert_iaddr_to_raw invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->store_struct_return == 0))
! internal_error ("gdbarch: verify_gdbarch: store_struct_return invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->store_return_value == 0))
! internal_error ("gdbarch: verify_gdbarch: store_return_value invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->extract_struct_value_address == 0))
! internal_error ("gdbarch: verify_gdbarch: extract_struct_value_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->use_struct_convention == 0))
! internal_error ("gdbarch: verify_gdbarch: use_struct_convention invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_init_saved_regs == 0))
! internal_error ("gdbarch: verify_gdbarch: frame_init_saved_regs invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->init_extra_frame_info == 0))
! internal_error ("gdbarch: verify_gdbarch: init_extra_frame_info invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->skip_prologue == 0))
! internal_error ("gdbarch: verify_gdbarch: skip_prologue invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->inner_than == 0))
! internal_error ("gdbarch: verify_gdbarch: inner_than invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->breakpoint_from_pc == 0))
! internal_error ("gdbarch: verify_gdbarch: breakpoint_from_pc invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->decr_pc_after_break == -1))
! internal_error ("gdbarch: verify_gdbarch: decr_pc_after_break invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->function_start_offset == -1))
! internal_error ("gdbarch: verify_gdbarch: function_start_offset invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->remote_translate_xfer_address == 0))
! internal_error ("gdbarch: verify_gdbarch: remote_translate_xfer_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_args_skip == -1))
! internal_error ("gdbarch: verify_gdbarch: frame_args_skip invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frameless_function_invocation == 0))
! internal_error ("gdbarch: verify_gdbarch: frameless_function_invocation invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_chain == 0))
! internal_error ("gdbarch: verify_gdbarch: frame_chain invalid");
if ((GDB_MULTI_ARCH >= 1)
&& (gdbarch->frame_chain_valid == 0))
! internal_error ("gdbarch: verify_gdbarch: frame_chain_valid invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_saved_pc == 0))
! internal_error ("gdbarch: verify_gdbarch: frame_saved_pc invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_args_address == 0))
! internal_error ("gdbarch: verify_gdbarch: frame_args_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_locals_address == 0))
! internal_error ("gdbarch: verify_gdbarch: frame_locals_address invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->saved_pc_after_call == 0))
! internal_error ("gdbarch: verify_gdbarch: saved_pc_after_call invalid");
if ((GDB_MULTI_ARCH >= 2)
&& (gdbarch->frame_num_args == 0))
! internal_error ("gdbarch: verify_gdbarch: frame_num_args invalid");
}
*************** gdbarch_ptr_bit (gdbarch)
*** 910,916 ****
struct gdbarch *gdbarch;
{
if (gdbarch->ptr_bit == 0)
! fatal ("gdbarch: gdbarch_ptr_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_ptr_bit called\n");
--- 910,916 ----
struct gdbarch *gdbarch;
{
if (gdbarch->ptr_bit == 0)
! internal_error ("gdbarch: gdbarch_ptr_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_ptr_bit called\n");
*************** gdbarch_short_bit (gdbarch)
*** 930,936 ****
struct gdbarch *gdbarch;
{
if (gdbarch->short_bit == 0)
! fatal ("gdbarch: gdbarch_short_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_short_bit called\n");
--- 930,936 ----
struct gdbarch *gdbarch;
{
if (gdbarch->short_bit == 0)
! internal_error ("gdbarch: gdbarch_short_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_short_bit called\n");
*************** gdbarch_int_bit (gdbarch)
*** 950,956 ****
struct gdbarch *gdbarch;
{
if (gdbarch->int_bit == 0)
! fatal ("gdbarch: gdbarch_int_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_int_bit called\n");
--- 950,956 ----
struct gdbarch *gdbarch;
{
if (gdbarch->int_bit == 0)
! internal_error ("gdbarch: gdbarch_int_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_int_bit called\n");
*************** gdbarch_long_bit (gdbarch)
*** 970,976 ****
struct gdbarch *gdbarch;
{
if (gdbarch->long_bit == 0)
! fatal ("gdbarch: gdbarch_long_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_long_bit called\n");
--- 970,976 ----
struct gdbarch *gdbarch;
{
if (gdbarch->long_bit == 0)
! internal_error ("gdbarch: gdbarch_long_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_long_bit called\n");
*************** gdbarch_long_long_bit (gdbarch)
*** 990,996 ****
struct gdbarch *gdbarch;
{
if (gdbarch->long_long_bit == 0)
! fatal ("gdbarch: gdbarch_long_long_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_long_long_bit called\n");
--- 990,996 ----
struct gdbarch *gdbarch;
{
if (gdbarch->long_long_bit == 0)
! internal_error ("gdbarch: gdbarch_long_long_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_long_long_bit called\n");
*************** gdbarch_float_bit (gdbarch)
*** 1010,1016 ****
struct gdbarch *gdbarch;
{
if (gdbarch->float_bit == 0)
! fatal ("gdbarch: gdbarch_float_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_float_bit called\n");
--- 1010,1016 ----
struct gdbarch *gdbarch;
{
if (gdbarch->float_bit == 0)
! internal_error ("gdbarch: gdbarch_float_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_float_bit called\n");
*************** gdbarch_double_bit (gdbarch)
*** 1030,1036 ****
struct gdbarch *gdbarch;
{
if (gdbarch->double_bit == 0)
! fatal ("gdbarch: gdbarch_double_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_double_bit called\n");
--- 1030,1036 ----
struct gdbarch *gdbarch;
{
if (gdbarch->double_bit == 0)
! internal_error ("gdbarch: gdbarch_double_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_double_bit called\n");
*************** gdbarch_long_double_bit (gdbarch)
*** 1050,1056 ****
struct gdbarch *gdbarch;
{
if (gdbarch->long_double_bit == 0)
! fatal ("gdbarch: gdbarch_long_double_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_long_double_bit called\n");
--- 1050,1056 ----
struct gdbarch *gdbarch;
{
if (gdbarch->long_double_bit == 0)
! internal_error ("gdbarch: gdbarch_long_double_bit invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_long_double_bit called\n");
*************** CORE_ADDR
*** 1069,1075 ****
gdbarch_read_pc (struct gdbarch *gdbarch, int pid)
{
if (gdbarch->read_pc == 0)
! fatal ("gdbarch: gdbarch_read_pc invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_read_pc called\n");
--- 1069,1075 ----
gdbarch_read_pc (struct gdbarch *gdbarch, int pid)
{
if (gdbarch->read_pc == 0)
! internal_error ("gdbarch: gdbarch_read_pc invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_read_pc called\n");
*************** void
*** 1088,1094 ****
gdbarch_write_pc (struct gdbarch *gdbarch, CORE_ADDR val, int pid)
{
if (gdbarch->write_pc == 0)
! fatal ("gdbarch: gdbarch_write_pc invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_write_pc called\n");
--- 1088,1094 ----
gdbarch_write_pc (struct gdbarch *gdbarch, CORE_ADDR val, int pid)
{
if (gdbarch->write_pc == 0)
! internal_error ("gdbarch: gdbarch_write_pc invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_write_pc called\n");
*************** CORE_ADDR
*** 1107,1113 ****
gdbarch_read_fp (struct gdbarch *gdbarch)
{
if (gdbarch->read_fp == 0)
! fatal ("gdbarch: gdbarch_read_fp invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_read_fp called\n");
--- 1107,1113 ----
gdbarch_read_fp (struct gdbarch *gdbarch)
{
if (gdbarch->read_fp == 0)
! internal_error ("gdbarch: gdbarch_read_fp invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_read_fp called\n");
*************** void
*** 1126,1132 ****
gdbarch_write_fp (struct gdbarch *gdbarch, CORE_ADDR val)
{
if (gdbarch->write_fp == 0)
! fatal ("gdbarch: gdbarch_write_fp invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_write_fp called\n");
--- 1126,1132 ----
gdbarch_write_fp (struct gdbarch *gdbarch, CORE_ADDR val)
{
if (gdbarch->write_fp == 0)
! internal_error ("gdbarch: gdbarch_write_fp invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_write_fp called\n");
*************** CORE_ADDR
*** 1145,1151 ****
gdbarch_read_sp (struct gdbarch *gdbarch)
{
if (gdbarch->read_sp == 0)
! fatal ("gdbarch: gdbarch_read_sp invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_read_sp called\n");
--- 1145,1151 ----
gdbarch_read_sp (struct gdbarch *gdbarch)
{
if (gdbarch->read_sp == 0)
! internal_error ("gdbarch: gdbarch_read_sp invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_read_sp called\n");
*************** void
*** 1164,1170 ****
gdbarch_write_sp (struct gdbarch *gdbarch, CORE_ADDR val)
{
if (gdbarch->write_sp == 0)
! fatal ("gdbarch: gdbarch_write_sp invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_write_sp called\n");
--- 1164,1170 ----
gdbarch_write_sp (struct gdbarch *gdbarch, CORE_ADDR val)
{
if (gdbarch->write_sp == 0)
! internal_error ("gdbarch: gdbarch_write_sp invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_write_sp called\n");
*************** gdbarch_num_regs (gdbarch)
*** 1184,1190 ****
struct gdbarch *gdbarch;
{
if (gdbarch->num_regs == -1)
! fatal ("gdbarch: gdbarch_num_regs invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_num_regs called\n");
--- 1184,1190 ----
struct gdbarch *gdbarch;
{
if (gdbarch->num_regs == -1)
! internal_error ("gdbarch: gdbarch_num_regs invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_num_regs called\n");
*************** gdbarch_sp_regnum (gdbarch)
*** 1204,1210 ****
struct gdbarch *gdbarch;
{
if (gdbarch->sp_regnum == -1)
! fatal ("gdbarch: gdbarch_sp_regnum invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_sp_regnum called\n");
--- 1204,1210 ----
struct gdbarch *gdbarch;
{
if (gdbarch->sp_regnum == -1)
! internal_error ("gdbarch: gdbarch_sp_regnum invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_sp_regnum called\n");
*************** gdbarch_fp_regnum (gdbarch)
*** 1224,1230 ****
struct gdbarch *gdbarch;
{
if (gdbarch->fp_regnum == -1)
! fatal ("gdbarch: gdbarch_fp_regnum invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_fp_regnum called\n");
--- 1224,1230 ----
struct gdbarch *gdbarch;
{
if (gdbarch->fp_regnum == -1)
! internal_error ("gdbarch: gdbarch_fp_regnum invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_fp_regnum called\n");
*************** gdbarch_pc_regnum (gdbarch)
*** 1244,1250 ****
struct gdbarch *gdbarch;
{
if (gdbarch->pc_regnum == -1)
! fatal ("gdbarch: gdbarch_pc_regnum invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_pc_regnum called\n");
--- 1244,1250 ----
struct gdbarch *gdbarch;
{
if (gdbarch->pc_regnum == -1)
! internal_error ("gdbarch: gdbarch_pc_regnum invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_pc_regnum called\n");
*************** set_gdbarch_pc_regnum (gdbarch, pc_regnu
*** 1262,1269 ****
char *
gdbarch_register_name (struct gdbarch *gdbarch, int regnr)
{
! if (gdbarch->register_name == 0)
! fatal ("gdbarch: gdbarch_register_name invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_name called\n");
--- 1262,1269 ----
char *
gdbarch_register_name (struct gdbarch *gdbarch, int regnr)
{
! if (gdbarch->register_name == 0 || 1)
! internal_error ("gdbarch: gdbarch_register_name invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_name called\n");
*************** gdbarch_register_size (gdbarch)
*** 1283,1289 ****
struct gdbarch *gdbarch;
{
if (gdbarch->register_size == -1)
! fatal ("gdbarch: gdbarch_register_size invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_size called\n");
--- 1283,1289 ----
struct gdbarch *gdbarch;
{
if (gdbarch->register_size == -1)
! internal_error ("gdbarch: gdbarch_register_size invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_size called\n");
*************** gdbarch_register_bytes (gdbarch)
*** 1303,1309 ****
struct gdbarch *gdbarch;
{
if (gdbarch->register_bytes == -1)
! fatal ("gdbarch: gdbarch_register_bytes invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_bytes called\n");
--- 1303,1309 ----
struct gdbarch *gdbarch;
{
if (gdbarch->register_bytes == -1)
! internal_error ("gdbarch: gdbarch_register_bytes invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_bytes called\n");
*************** int
*** 1322,1328 ****
gdbarch_register_byte (struct gdbarch *gdbarch, int reg_nr)
{
if (gdbarch->register_byte == 0)
! fatal ("gdbarch: gdbarch_register_byte invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_byte called\n");
--- 1322,1328 ----
gdbarch_register_byte (struct gdbarch *gdbarch, int reg_nr)
{
if (gdbarch->register_byte == 0)
! internal_error ("gdbarch: gdbarch_register_byte invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_byte called\n");
*************** int
*** 1341,1347 ****
gdbarch_register_raw_size (struct gdbarch *gdbarch, int reg_nr)
{
if (gdbarch->register_raw_size == 0)
! fatal ("gdbarch: gdbarch_register_raw_size invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_raw_size called\n");
--- 1341,1347 ----
gdbarch_register_raw_size (struct gdbarch *gdbarch, int reg_nr)
{
if (gdbarch->register_raw_size == 0)
! internal_error ("gdbarch: gdbarch_register_raw_size invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_raw_size called\n");
*************** gdbarch_max_register_raw_size (gdbarch)
*** 1361,1367 ****
struct gdbarch *gdbarch;
{
if (gdbarch->max_register_raw_size == -1)
! fatal ("gdbarch: gdbarch_max_register_raw_size invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_max_register_raw_size called\n");
--- 1361,1367 ----
struct gdbarch *gdbarch;
{
if (gdbarch->max_register_raw_size == -1)
! internal_error ("gdbarch: gdbarch_max_register_raw_size invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_max_register_raw_size called\n");
*************** int
*** 1380,1386 ****
gdbarch_register_virtual_size (struct gdbarch *gdbarch, int reg_nr)
{
if (gdbarch->register_virtual_size == 0)
! fatal ("gdbarch: gdbarch_register_virtual_size invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_virtual_size called\n");
--- 1380,1386 ----
gdbarch_register_virtual_size (struct gdbarch *gdbarch, int reg_nr)
{
if (gdbarch->register_virtual_size == 0)
! internal_error ("gdbarch: gdbarch_register_virtual_size invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_virtual_size called\n");
*************** gdbarch_max_register_virtual_size (gdbar
*** 1400,1406 ****
struct gdbarch *gdbarch;
{
if (gdbarch->max_register_virtual_size == -1)
! fatal ("gdbarch: gdbarch_max_register_virtual_size invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_max_register_virtual_size called\n");
--- 1400,1406 ----
struct gdbarch *gdbarch;
{
if (gdbarch->max_register_virtual_size == -1)
! internal_error ("gdbarch: gdbarch_max_register_virtual_size invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_max_register_virtual_size called\n");
*************** struct type *
*** 1419,1425 ****
gdbarch_register_virtual_type (struct gdbarch *gdbarch, int reg_nr)
{
if (gdbarch->register_virtual_type == 0)
! fatal ("gdbarch: gdbarch_register_virtual_type invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_virtual_type called\n");
--- 1419,1425 ----
gdbarch_register_virtual_type (struct gdbarch *gdbarch, int reg_nr)
{
if (gdbarch->register_virtual_type == 0)
! internal_error ("gdbarch: gdbarch_register_virtual_type invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_virtual_type called\n");
*************** gdbarch_use_generic_dummy_frames (gdbarc
*** 1439,1445 ****
struct gdbarch *gdbarch;
{
if (gdbarch->use_generic_dummy_frames == -1)
! fatal ("gdbarch: gdbarch_use_generic_dummy_frames invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_use_generic_dummy_frames called\n");
--- 1439,1445 ----
struct gdbarch *gdbarch;
{
if (gdbarch->use_generic_dummy_frames == -1)
! internal_error ("gdbarch: gdbarch_use_generic_dummy_frames invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_use_generic_dummy_frames called\n");
*************** gdbarch_call_dummy_location (gdbarch)
*** 1459,1465 ****
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_location == 0)
! fatal ("gdbarch: gdbarch_call_dummy_location invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_location called\n");
--- 1459,1465 ----
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_location == 0)
! internal_error ("gdbarch: gdbarch_call_dummy_location invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_location called\n");
*************** CORE_ADDR
*** 1478,1484 ****
gdbarch_call_dummy_address (struct gdbarch *gdbarch)
{
if (gdbarch->call_dummy_address == 0)
! fatal ("gdbarch: gdbarch_call_dummy_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_address called\n");
--- 1478,1484 ----
gdbarch_call_dummy_address (struct gdbarch *gdbarch)
{
if (gdbarch->call_dummy_address == 0)
! internal_error ("gdbarch: gdbarch_call_dummy_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_address called\n");
*************** gdbarch_call_dummy_start_offset (gdbarch
*** 1498,1504 ****
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_start_offset == -1)
! fatal ("gdbarch: gdbarch_call_dummy_start_offset invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_start_offset called\n");
--- 1498,1504 ----
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_start_offset == -1)
! internal_error ("gdbarch: gdbarch_call_dummy_start_offset invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_start_offset called\n");
*************** gdbarch_call_dummy_breakpoint_offset (gd
*** 1518,1524 ****
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_breakpoint_offset == -1)
! fatal ("gdbarch: gdbarch_call_dummy_breakpoint_offset invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_breakpoint_offset called\n");
--- 1518,1524 ----
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_breakpoint_offset == -1)
! internal_error ("gdbarch: gdbarch_call_dummy_breakpoint_offset invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_breakpoint_offset called\n");
*************** gdbarch_call_dummy_breakpoint_offset_p (
*** 1538,1544 ****
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_breakpoint_offset_p == -1)
! fatal ("gdbarch: gdbarch_call_dummy_breakpoint_offset_p invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_breakpoint_offset_p called\n");
--- 1538,1544 ----
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_breakpoint_offset_p == -1)
! internal_error ("gdbarch: gdbarch_call_dummy_breakpoint_offset_p invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_breakpoint_offset_p called\n");
*************** gdbarch_call_dummy_length (gdbarch)
*** 1558,1564 ****
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_length == -1)
! fatal ("gdbarch: gdbarch_call_dummy_length invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_length called\n");
--- 1558,1564 ----
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_length == -1)
! internal_error ("gdbarch: gdbarch_call_dummy_length invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_length called\n");
*************** int
*** 1577,1583 ****
gdbarch_pc_in_call_dummy (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR sp, CORE_ADDR frame_address)
{
if (gdbarch->pc_in_call_dummy == 0)
! fatal ("gdbarch: gdbarch_pc_in_call_dummy invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_pc_in_call_dummy called\n");
--- 1577,1583 ----
gdbarch_pc_in_call_dummy (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR sp, CORE_ADDR frame_address)
{
if (gdbarch->pc_in_call_dummy == 0)
! internal_error ("gdbarch: gdbarch_pc_in_call_dummy invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_pc_in_call_dummy called\n");
*************** gdbarch_call_dummy_p (gdbarch)
*** 1597,1603 ****
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_p == -1)
! fatal ("gdbarch: gdbarch_call_dummy_p invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_p called\n");
--- 1597,1603 ----
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_p == -1)
! internal_error ("gdbarch: gdbarch_call_dummy_p invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_p called\n");
*************** gdbarch_call_dummy_stack_adjust_p (gdbar
*** 1653,1659 ****
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_stack_adjust_p == -1)
! fatal ("gdbarch: gdbarch_call_dummy_stack_adjust_p invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_stack_adjust_p called\n");
--- 1653,1659 ----
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_stack_adjust_p == -1)
! internal_error ("gdbarch: gdbarch_call_dummy_stack_adjust_p invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_stack_adjust_p called\n");
*************** gdbarch_call_dummy_stack_adjust (gdbarch
*** 1673,1679 ****
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_stack_adjust_p && gdbarch->call_dummy_stack_adjust == 0)
! fatal ("gdbarch: gdbarch_call_dummy_stack_adjust invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_stack_adjust called\n");
--- 1673,1679 ----
struct gdbarch *gdbarch;
{
if (gdbarch->call_dummy_stack_adjust_p && gdbarch->call_dummy_stack_adjust == 0)
! internal_error ("gdbarch: gdbarch_call_dummy_stack_adjust invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_stack_adjust called\n");
*************** void
*** 1692,1698 ****
gdbarch_fix_call_dummy (struct gdbarch *gdbarch, char *dummy, CORE_ADDR pc, CORE_ADDR fun, int nargs, struct value **args, struct type *type, int gcc_p)
{
if (gdbarch->fix_call_dummy == 0)
! fatal ("gdbarch: gdbarch_fix_call_dummy invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_fix_call_dummy called\n");
--- 1692,1698 ----
gdbarch_fix_call_dummy (struct gdbarch *gdbarch, char *dummy, CORE_ADDR pc, CORE_ADDR fun, int nargs, struct value **args, struct type *type, int gcc_p)
{
if (gdbarch->fix_call_dummy == 0)
! internal_error ("gdbarch: gdbarch_fix_call_dummy invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_fix_call_dummy called\n");
*************** void
*** 1747,1753 ****
gdbarch_get_saved_register (struct gdbarch *gdbarch, char *raw_buffer, int *optimized, CORE_ADDR *addrp, struct frame_info *frame, int regnum, enum lval_type *lval)
{
if (gdbarch->get_saved_register == 0)
! fatal ("gdbarch: gdbarch_get_saved_register invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_get_saved_register called\n");
--- 1747,1753 ----
gdbarch_get_saved_register (struct gdbarch *gdbarch, char *raw_buffer, int *optimized, CORE_ADDR *addrp, struct frame_info *frame, int regnum, enum lval_type *lval)
{
if (gdbarch->get_saved_register == 0)
! internal_error ("gdbarch: gdbarch_get_saved_register invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_get_saved_register called\n");
*************** int
*** 1766,1772 ****
gdbarch_register_convertible (struct gdbarch *gdbarch, int nr)
{
if (gdbarch->register_convertible == 0)
! fatal ("gdbarch: gdbarch_register_convertible invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_convertible called\n");
--- 1766,1772 ----
gdbarch_register_convertible (struct gdbarch *gdbarch, int nr)
{
if (gdbarch->register_convertible == 0)
! internal_error ("gdbarch: gdbarch_register_convertible invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_convertible called\n");
*************** void
*** 1785,1791 ****
gdbarch_register_convert_to_virtual (struct gdbarch *gdbarch, int regnum, struct type *type, char *from, char *to)
{
if (gdbarch->register_convert_to_virtual == 0)
! fatal ("gdbarch: gdbarch_register_convert_to_virtual invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_convert_to_virtual called\n");
--- 1785,1791 ----
gdbarch_register_convert_to_virtual (struct gdbarch *gdbarch, int regnum, struct type *type, char *from, char *to)
{
if (gdbarch->register_convert_to_virtual == 0)
! internal_error ("gdbarch: gdbarch_register_convert_to_virtual invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_convert_to_virtual called\n");
*************** void
*** 1804,1810 ****
gdbarch_register_convert_to_raw (struct gdbarch *gdbarch, struct type *type, int regnum, char *from, char *to)
{
if (gdbarch->register_convert_to_raw == 0)
! fatal ("gdbarch: gdbarch_register_convert_to_raw invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_convert_to_raw called\n");
--- 1804,1810 ----
gdbarch_register_convert_to_raw (struct gdbarch *gdbarch, struct type *type, int regnum, char *from, char *to)
{
if (gdbarch->register_convert_to_raw == 0)
! internal_error ("gdbarch: gdbarch_register_convert_to_raw invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_register_convert_to_raw called\n");
*************** void
*** 1823,1829 ****
gdbarch_extract_return_value (struct gdbarch *gdbarch, struct type *type, char *regbuf, char *valbuf)
{
if (gdbarch->extract_return_value == 0)
! fatal ("gdbarch: gdbarch_extract_return_value invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_extract_return_value called\n");
--- 1823,1829 ----
gdbarch_extract_return_value (struct gdbarch *gdbarch, struct type *type, char *regbuf, char *valbuf)
{
if (gdbarch->extract_return_value == 0)
! internal_error ("gdbarch: gdbarch_extract_return_value invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_extract_return_value called\n");
*************** CORE_ADDR
*** 1842,1848 ****
gdbarch_push_arguments (struct gdbarch *gdbarch, int nargs, struct value **args, CORE_ADDR sp, int struct_return, CORE_ADDR struct_addr)
{
if (gdbarch->push_arguments == 0)
! fatal ("gdbarch: gdbarch_push_arguments invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_push_arguments called\n");
--- 1842,1848 ----
gdbarch_push_arguments (struct gdbarch *gdbarch, int nargs, struct value **args, CORE_ADDR sp, int struct_return, CORE_ADDR struct_addr)
{
if (gdbarch->push_arguments == 0)
! internal_error ("gdbarch: gdbarch_push_arguments invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_push_arguments called\n");
*************** void
*** 1861,1867 ****
gdbarch_push_dummy_frame (struct gdbarch *gdbarch)
{
if (gdbarch->push_dummy_frame == 0)
! fatal ("gdbarch: gdbarch_push_dummy_frame invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_push_dummy_frame called\n");
--- 1861,1867 ----
gdbarch_push_dummy_frame (struct gdbarch *gdbarch)
{
if (gdbarch->push_dummy_frame == 0)
! internal_error ("gdbarch: gdbarch_push_dummy_frame invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_push_dummy_frame called\n");
*************** CORE_ADDR
*** 1880,1886 ****
gdbarch_push_return_address (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR sp)
{
if (gdbarch->push_return_address == 0)
! fatal ("gdbarch: gdbarch_push_return_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_push_return_address called\n");
--- 1880,1886 ----
gdbarch_push_return_address (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR sp)
{
if (gdbarch->push_return_address == 0)
! internal_error ("gdbarch: gdbarch_push_return_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_push_return_address called\n");
*************** void
*** 1899,1905 ****
gdbarch_pop_frame (struct gdbarch *gdbarch)
{
if (gdbarch->pop_frame == 0)
! fatal ("gdbarch: gdbarch_pop_frame invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_pop_frame called\n");
--- 1899,1905 ----
gdbarch_pop_frame (struct gdbarch *gdbarch)
{
if (gdbarch->pop_frame == 0)
! internal_error ("gdbarch: gdbarch_pop_frame invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_pop_frame called\n");
*************** CORE_ADDR
*** 1918,1924 ****
gdbarch_d10v_make_daddr (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_make_daddr == 0)
! fatal ("gdbarch: gdbarch_d10v_make_daddr invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_make_daddr called\n");
--- 1918,1924 ----
gdbarch_d10v_make_daddr (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_make_daddr == 0)
! internal_error ("gdbarch: gdbarch_d10v_make_daddr invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_make_daddr called\n");
*************** CORE_ADDR
*** 1937,1943 ****
gdbarch_d10v_make_iaddr (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_make_iaddr == 0)
! fatal ("gdbarch: gdbarch_d10v_make_iaddr invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_make_iaddr called\n");
--- 1937,1943 ----
gdbarch_d10v_make_iaddr (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_make_iaddr == 0)
! internal_error ("gdbarch: gdbarch_d10v_make_iaddr invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_make_iaddr called\n");
*************** int
*** 1956,1962 ****
gdbarch_d10v_daddr_p (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_daddr_p == 0)
! fatal ("gdbarch: gdbarch_d10v_daddr_p invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_daddr_p called\n");
--- 1956,1962 ----
gdbarch_d10v_daddr_p (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_daddr_p == 0)
! internal_error ("gdbarch: gdbarch_d10v_daddr_p invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_daddr_p called\n");
*************** int
*** 1975,1981 ****
gdbarch_d10v_iaddr_p (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_iaddr_p == 0)
! fatal ("gdbarch: gdbarch_d10v_iaddr_p invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_iaddr_p called\n");
--- 1975,1981 ----
gdbarch_d10v_iaddr_p (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_iaddr_p == 0)
! internal_error ("gdbarch: gdbarch_d10v_iaddr_p invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_iaddr_p called\n");
*************** CORE_ADDR
*** 1994,2000 ****
gdbarch_d10v_convert_daddr_to_raw (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_convert_daddr_to_raw == 0)
! fatal ("gdbarch: gdbarch_d10v_convert_daddr_to_raw invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_convert_daddr_to_raw called\n");
--- 1994,2000 ----
gdbarch_d10v_convert_daddr_to_raw (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_convert_daddr_to_raw == 0)
! internal_error ("gdbarch: gdbarch_d10v_convert_daddr_to_raw invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_convert_daddr_to_raw called\n");
*************** CORE_ADDR
*** 2013,2019 ****
gdbarch_d10v_convert_iaddr_to_raw (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_convert_iaddr_to_raw == 0)
! fatal ("gdbarch: gdbarch_d10v_convert_iaddr_to_raw invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_convert_iaddr_to_raw called\n");
--- 2013,2019 ----
gdbarch_d10v_convert_iaddr_to_raw (struct gdbarch *gdbarch, CORE_ADDR x)
{
if (gdbarch->d10v_convert_iaddr_to_raw == 0)
! internal_error ("gdbarch: gdbarch_d10v_convert_iaddr_to_raw invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_d10v_convert_iaddr_to_raw called\n");
*************** void
*** 2032,2038 ****
gdbarch_store_struct_return (struct gdbarch *gdbarch, CORE_ADDR addr, CORE_ADDR sp)
{
if (gdbarch->store_struct_return == 0)
! fatal ("gdbarch: gdbarch_store_struct_return invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_store_struct_return called\n");
--- 2032,2038 ----
gdbarch_store_struct_return (struct gdbarch *gdbarch, CORE_ADDR addr, CORE_ADDR sp)
{
if (gdbarch->store_struct_return == 0)
! internal_error ("gdbarch: gdbarch_store_struct_return invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_store_struct_return called\n");
*************** void
*** 2051,2057 ****
gdbarch_store_return_value (struct gdbarch *gdbarch, struct type *type, char *valbuf)
{
if (gdbarch->store_return_value == 0)
! fatal ("gdbarch: gdbarch_store_return_value invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_store_return_value called\n");
--- 2051,2057 ----
gdbarch_store_return_value (struct gdbarch *gdbarch, struct type *type, char *valbuf)
{
if (gdbarch->store_return_value == 0)
! internal_error ("gdbarch: gdbarch_store_return_value invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_store_return_value called\n");
*************** CORE_ADDR
*** 2070,2076 ****
gdbarch_extract_struct_value_address (struct gdbarch *gdbarch, char *regbuf)
{
if (gdbarch->extract_struct_value_address == 0)
! fatal ("gdbarch: gdbarch_extract_struct_value_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_extract_struct_value_address called\n");
--- 2070,2076 ----
gdbarch_extract_struct_value_address (struct gdbarch *gdbarch, char *regbuf)
{
if (gdbarch->extract_struct_value_address == 0)
! internal_error ("gdbarch: gdbarch_extract_struct_value_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_extract_struct_value_address called\n");
*************** int
*** 2089,2095 ****
gdbarch_use_struct_convention (struct gdbarch *gdbarch, int gcc_p, struct type *value_type)
{
if (gdbarch->use_struct_convention == 0)
! fatal ("gdbarch: gdbarch_use_struct_convention invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_use_struct_convention called\n");
--- 2089,2095 ----
gdbarch_use_struct_convention (struct gdbarch *gdbarch, int gcc_p, struct type *value_type)
{
if (gdbarch->use_struct_convention == 0)
! internal_error ("gdbarch: gdbarch_use_struct_convention invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_use_struct_convention called\n");
*************** void
*** 2108,2114 ****
gdbarch_frame_init_saved_regs (struct gdbarch *gdbarch, struct frame_info *frame)
{
if (gdbarch->frame_init_saved_regs == 0)
! fatal ("gdbarch: gdbarch_frame_init_saved_regs invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_init_saved_regs called\n");
--- 2108,2114 ----
gdbarch_frame_init_saved_regs (struct gdbarch *gdbarch, struct frame_info *frame)
{
if (gdbarch->frame_init_saved_regs == 0)
! internal_error ("gdbarch: gdbarch_frame_init_saved_regs invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_init_saved_regs called\n");
*************** void
*** 2127,2133 ****
gdbarch_init_extra_frame_info (struct gdbarch *gdbarch, int fromleaf, struct frame_info *frame)
{
if (gdbarch->init_extra_frame_info == 0)
! fatal ("gdbarch: gdbarch_init_extra_frame_info invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_init_extra_frame_info called\n");
--- 2127,2133 ----
gdbarch_init_extra_frame_info (struct gdbarch *gdbarch, int fromleaf, struct frame_info *frame)
{
if (gdbarch->init_extra_frame_info == 0)
! internal_error ("gdbarch: gdbarch_init_extra_frame_info invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_init_extra_frame_info called\n");
*************** CORE_ADDR
*** 2146,2152 ****
gdbarch_skip_prologue (struct gdbarch *gdbarch, CORE_ADDR ip)
{
if (gdbarch->skip_prologue == 0)
! fatal ("gdbarch: gdbarch_skip_prologue invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_prologue called\n");
--- 2146,2152 ----
gdbarch_skip_prologue (struct gdbarch *gdbarch, CORE_ADDR ip)
{
if (gdbarch->skip_prologue == 0)
! internal_error ("gdbarch: gdbarch_skip_prologue invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_prologue called\n");
*************** int
*** 2165,2171 ****
gdbarch_inner_than (struct gdbarch *gdbarch, CORE_ADDR lhs, CORE_ADDR rhs)
{
if (gdbarch->inner_than == 0)
! fatal ("gdbarch: gdbarch_inner_than invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_inner_than called\n");
--- 2165,2171 ----
gdbarch_inner_than (struct gdbarch *gdbarch, CORE_ADDR lhs, CORE_ADDR rhs)
{
if (gdbarch->inner_than == 0)
! internal_error ("gdbarch: gdbarch_inner_than invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_inner_than called\n");
*************** unsigned char *
*** 2184,2190 ****
gdbarch_breakpoint_from_pc (struct gdbarch *gdbarch, CORE_ADDR *pcptr, int *lenptr)
{
if (gdbarch->breakpoint_from_pc == 0)
! fatal ("gdbarch: gdbarch_breakpoint_from_pc invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_breakpoint_from_pc called\n");
--- 2184,2190 ----
gdbarch_breakpoint_from_pc (struct gdbarch *gdbarch, CORE_ADDR *pcptr, int *lenptr)
{
if (gdbarch->breakpoint_from_pc == 0)
! internal_error ("gdbarch: gdbarch_breakpoint_from_pc invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_breakpoint_from_pc called\n");
*************** gdbarch_decr_pc_after_break (gdbarch)
*** 2204,2210 ****
struct gdbarch *gdbarch;
{
if (gdbarch->decr_pc_after_break == -1)
! fatal ("gdbarch: gdbarch_decr_pc_after_break invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_decr_pc_after_break called\n");
--- 2204,2210 ----
struct gdbarch *gdbarch;
{
if (gdbarch->decr_pc_after_break == -1)
! internal_error ("gdbarch: gdbarch_decr_pc_after_break invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_decr_pc_after_break called\n");
*************** gdbarch_function_start_offset (gdbarch)
*** 2224,2230 ****
struct gdbarch *gdbarch;
{
if (gdbarch->function_start_offset == -1)
! fatal ("gdbarch: gdbarch_function_start_offset invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_function_start_offset called\n");
--- 2224,2230 ----
struct gdbarch *gdbarch;
{
if (gdbarch->function_start_offset == -1)
! internal_error ("gdbarch: gdbarch_function_start_offset invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_function_start_offset called\n");
*************** void
*** 2243,2249 ****
gdbarch_remote_translate_xfer_address (struct gdbarch *gdbarch, CORE_ADDR gdb_addr, int gdb_len, CORE_ADDR *rem_addr, int *rem_len)
{
if (gdbarch->remote_translate_xfer_address == 0)
! fatal ("gdbarch: gdbarch_remote_translate_xfer_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_remote_translate_xfer_address called\n");
--- 2243,2249 ----
gdbarch_remote_translate_xfer_address (struct gdbarch *gdbarch, CORE_ADDR gdb_addr, int gdb_len, CORE_ADDR *rem_addr, int *rem_len)
{
if (gdbarch->remote_translate_xfer_address == 0)
! internal_error ("gdbarch: gdbarch_remote_translate_xfer_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_remote_translate_xfer_address called\n");
*************** gdbarch_frame_args_skip (gdbarch)
*** 2263,2269 ****
struct gdbarch *gdbarch;
{
if (gdbarch->frame_args_skip == -1)
! fatal ("gdbarch: gdbarch_frame_args_skip invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_args_skip called\n");
--- 2263,2269 ----
struct gdbarch *gdbarch;
{
if (gdbarch->frame_args_skip == -1)
! internal_error ("gdbarch: gdbarch_frame_args_skip invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_args_skip called\n");
*************** int
*** 2282,2288 ****
gdbarch_frameless_function_invocation (struct gdbarch *gdbarch, struct frame_info *fi)
{
if (gdbarch->frameless_function_invocation == 0)
! fatal ("gdbarch: gdbarch_frameless_function_invocation invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frameless_function_invocation called\n");
--- 2282,2288 ----
gdbarch_frameless_function_invocation (struct gdbarch *gdbarch, struct frame_info *fi)
{
if (gdbarch->frameless_function_invocation == 0)
! internal_error ("gdbarch: gdbarch_frameless_function_invocation invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frameless_function_invocation called\n");
*************** CORE_ADDR
*** 2301,2307 ****
gdbarch_frame_chain (struct gdbarch *gdbarch, struct frame_info *frame)
{
if (gdbarch->frame_chain == 0)
! fatal ("gdbarch: gdbarch_frame_chain invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_chain called\n");
--- 2301,2307 ----
gdbarch_frame_chain (struct gdbarch *gdbarch, struct frame_info *frame)
{
if (gdbarch->frame_chain == 0)
! internal_error ("gdbarch: gdbarch_frame_chain invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_chain called\n");
*************** int
*** 2320,2326 ****
gdbarch_frame_chain_valid (struct gdbarch *gdbarch, CORE_ADDR chain, struct frame_info *thisframe)
{
if (gdbarch->frame_chain_valid == 0)
! fatal ("gdbarch: gdbarch_frame_chain_valid invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_chain_valid called\n");
--- 2320,2326 ----
gdbarch_frame_chain_valid (struct gdbarch *gdbarch, CORE_ADDR chain, struct frame_info *thisframe)
{
if (gdbarch->frame_chain_valid == 0)
! internal_error ("gdbarch: gdbarch_frame_chain_valid invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_chain_valid called\n");
*************** CORE_ADDR
*** 2339,2345 ****
gdbarch_frame_saved_pc (struct gdbarch *gdbarch, struct frame_info *fi)
{
if (gdbarch->frame_saved_pc == 0)
! fatal ("gdbarch: gdbarch_frame_saved_pc invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_saved_pc called\n");
--- 2339,2345 ----
gdbarch_frame_saved_pc (struct gdbarch *gdbarch, struct frame_info *fi)
{
if (gdbarch->frame_saved_pc == 0)
! internal_error ("gdbarch: gdbarch_frame_saved_pc invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_saved_pc called\n");
*************** CORE_ADDR
*** 2358,2364 ****
gdbarch_frame_args_address (struct gdbarch *gdbarch, struct frame_info *fi)
{
if (gdbarch->frame_args_address == 0)
! fatal ("gdbarch: gdbarch_frame_args_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_args_address called\n");
--- 2358,2364 ----
gdbarch_frame_args_address (struct gdbarch *gdbarch, struct frame_info *fi)
{
if (gdbarch->frame_args_address == 0)
! internal_error ("gdbarch: gdbarch_frame_args_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_args_address called\n");
*************** CORE_ADDR
*** 2377,2383 ****
gdbarch_frame_locals_address (struct gdbarch *gdbarch, struct frame_info *fi)
{
if (gdbarch->frame_locals_address == 0)
! fatal ("gdbarch: gdbarch_frame_locals_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_locals_address called\n");
--- 2377,2383 ----
gdbarch_frame_locals_address (struct gdbarch *gdbarch, struct frame_info *fi)
{
if (gdbarch->frame_locals_address == 0)
! internal_error ("gdbarch: gdbarch_frame_locals_address invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_locals_address called\n");
*************** CORE_ADDR
*** 2396,2402 ****
gdbarch_saved_pc_after_call (struct gdbarch *gdbarch, struct frame_info *frame)
{
if (gdbarch->saved_pc_after_call == 0)
! fatal ("gdbarch: gdbarch_saved_pc_after_call invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_saved_pc_after_call called\n");
--- 2396,2402 ----
gdbarch_saved_pc_after_call (struct gdbarch *gdbarch, struct frame_info *frame)
{
if (gdbarch->saved_pc_after_call == 0)
! internal_error ("gdbarch: gdbarch_saved_pc_after_call invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_saved_pc_after_call called\n");
*************** int
*** 2415,2421 ****
gdbarch_frame_num_args (struct gdbarch *gdbarch, struct frame_info *frame)
{
if (gdbarch->frame_num_args == 0)
! fatal ("gdbarch: gdbarch_frame_num_args invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_num_args called\n");
--- 2415,2421 ----
gdbarch_frame_num_args (struct gdbarch *gdbarch, struct frame_info *frame)
{
if (gdbarch->frame_num_args == 0)
! internal_error ("gdbarch: gdbarch_frame_num_args invalid");
if (gdbarch_debug >= 2)
/* FIXME: gdb_std??? */
fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_num_args called\n");
*************** gdbarch_data (data)
*** 2502,2508 ****
struct gdbarch_data *data;
{
if (data->index >= current_gdbarch->nr_data)
! fatal ("gdbarch_data: request for non-existant data.");
return current_gdbarch->data[data->index];
}
--- 2502,2508 ----
struct gdbarch_data *data;
{
if (data->index >= current_gdbarch->nr_data)
! internal_error ("gdbarch_data: request for non-existant data.");
return current_gdbarch->data[data->index];
}
*************** register_gdbarch_init (bfd_architecture,
*** 2627,2633 ****
bfd_arch_info = bfd_lookup_arch (bfd_architecture, 0);
if (bfd_arch_info == NULL)
{
! fatal ("gdbarch: Attempt to register unknown architecture (%d)", bfd_architecture);
}
/* Check that we haven't seen this architecture before */
for (curr = &gdbarch_init_registrary;
--- 2627,2633 ----
bfd_arch_info = bfd_lookup_arch (bfd_architecture, 0);
if (bfd_arch_info == NULL)
{
! internal_error ("gdbarch: Attempt to register unknown architecture (%d)", bfd_architecture);
}
/* Check that we haven't seen this architecture before */
for (curr = &gdbarch_init_registrary;
*************** register_gdbarch_init (bfd_architecture,
*** 2635,2641 ****
curr = &(*curr)->next)
{
if (bfd_architecture == (*curr)->bfd_architecture)
! fatal ("gdbarch: Duplicate registraration of architecture (%s)",
bfd_arch_info->printable_name);
}
/* log it */
--- 2635,2641 ----
curr = &(*curr)->next)
{
if (bfd_architecture == (*curr)->bfd_architecture)
! internal_error ("gdbarch: Duplicate registraration of architecture (%s)",
bfd_arch_info->printable_name);
}
/* log it */
*************** set_architecture_from_arch_mach (arch, m
*** 3159,3165 ****
if (wanted != NULL)
set_arch (wanted, set_arch_manual);
else
! fatal ("gdbarch: hardwired architecture/machine not reconized");
}
/* Set the architecture from a BFD */
--- 3159,3165 ----
if (wanted != NULL)
set_arch (wanted, set_arch_manual);
else
! internal_error ("gdbarch: hardwired architecture/machine not reconized");
}
/* Set the architecture from a BFD */
Index: gdbarch.h
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/gdbarch.h,v
retrieving revision 2.54
diff -p -r2.54 gdbarch.h
*** gdbarch.h 1999/07/13 06:49:26 2.54
--- gdbarch.h 1999/08/06 09:16:07
*************** extern disassemble_info tm_print_insn_in
*** 1013,1022 ****
#define GDB_TARGET_IS_D10V (TARGET_ARCHITECTURE->arch == bfd_arch_d10v)
#ifndef D10V_MAKE_DADDR
! #define D10V_MAKE_DADDR(X) (fatal ("gdbarch: D10V_MAKE_DADDR"), 0)
#endif
#ifndef D10V_MAKE_IADDR
! #define D10V_MAKE_IADDR(X) (fatal ("gdbarch: D10V_MAKE_IADDR"), 0)
#endif
--- 1013,1022 ----
#define GDB_TARGET_IS_D10V (TARGET_ARCHITECTURE->arch == bfd_arch_d10v)
#ifndef D10V_MAKE_DADDR
! #define D10V_MAKE_DADDR(X) (internal_error ("gdbarch: D10V_MAKE_DADDR"), 0)
#endif
#ifndef D10V_MAKE_IADDR
! #define D10V_MAKE_IADDR(X) (internal_error ("gdbarch: D10V_MAKE_IADDR"), 0)
#endif
*************** extern int generic_register_convertible_
*** 1042,1048 ****
/* Fallback definition for EXTRACT_STRUCT_VALUE_ADDRESS */
#ifndef EXTRACT_STRUCT_VALUE_ADDRESS
#define EXTRACT_STRUCT_VALUE_ADDRESS_P (0)
! #define EXTRACT_STRUCT_VALUE_ADDRESS(X) (fatal ("gdbarch: EXTRACT_STRUCT_VALUE_ADDRESS"), 0)
#else
#ifndef EXTRACT_STRUCT_VALUE_ADDRESS_P
#define EXTRACT_STRUCT_VALUE_ADDRESS_P (1)
--- 1042,1048 ----
/* Fallback definition for EXTRACT_STRUCT_VALUE_ADDRESS */
#ifndef EXTRACT_STRUCT_VALUE_ADDRESS
#define EXTRACT_STRUCT_VALUE_ADDRESS_P (0)
! #define EXTRACT_STRUCT_VALUE_ADDRESS(X) (internal_error ("gdbarch: EXTRACT_STRUCT_VALUE_ADDRESS"), 0)
#else
#ifndef EXTRACT_STRUCT_VALUE_ADDRESS_P
#define EXTRACT_STRUCT_VALUE_ADDRESS_P (1)
Index: hppah-nat.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/hppah-nat.c,v
retrieving revision 2.26
diff -p -r2.26 hppah-nat.c
*** hppah-nat.c 1999/07/28 20:54:22 2.26
--- hppah-nat.c 1999/08/06 09:16:12
*************** fetch_register (regno)
*** 157,163 ****
+ (REGISTER_BYTE (regno) - REGISTER_BYTE (1)));
else
! fatal ("hppa-nat.c (fetch_register): unexpected register size");
for (i = 0; i < len; i += sizeof (int))
{
--- 157,163 ----
+ (REGISTER_BYTE (regno) - REGISTER_BYTE (1)));
else
! internal_error ("hppa-nat.c (fetch_register): unexpected register size");
for (i = 0; i < len; i += sizeof (int))
{
Index: infcmd.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/infcmd.c,v
retrieving revision 1.144
diff -p -r1.144 infcmd.c
*** infcmd.c 1999/07/15 16:44:48 1.144
--- infcmd.c 1999/08/06 09:16:16
*************** finish_command_continuation (arg)
*** 919,925 ****
value_type = TYPE_TARGET_TYPE (SYMBOL_TYPE (function));
if (!value_type)
! fatal ("internal: finish_command: function has no target type");
if (TYPE_CODE (value_type) == TYPE_CODE_VOID)
{
--- 919,925 ----
value_type = TYPE_TARGET_TYPE (SYMBOL_TYPE (function));
if (!value_type)
! internal_error ("finish_command: function has no target type");
if (TYPE_CODE (value_type) == TYPE_CODE_VOID)
{
*************** finish_command (arg, from_tty)
*** 1072,1078 ****
value_type = TYPE_TARGET_TYPE (SYMBOL_TYPE (function));
if (!value_type)
! fatal ("internal: finish_command: function has no target type");
/* FIXME: Shouldn't we do the cleanups before returning? */
if (TYPE_CODE (value_type) == TYPE_CODE_VOID)
--- 1072,1078 ----
value_type = TYPE_TARGET_TYPE (SYMBOL_TYPE (function));
if (!value_type)
! internal_error ("finish_command: function has no target type");
/* FIXME: Shouldn't we do the cleanups before returning? */
if (TYPE_CODE (value_type) == TYPE_CODE_VOID)
Index: infptrace.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/infptrace.c,v
retrieving revision 1.69
diff -p -r1.69 infptrace.c
*** infptrace.c 1999/07/07 23:51:32 1.69
--- infptrace.c 1999/08/06 09:16:17
*************** _initialize_kernel_u_addr ()
*** 330,336 ****
if (nlist ("/vmunix", names) == 0)
kernel_u_addr = names[0].n_value;
else
! fatal ("Unable to get kernel u area address.");
#endif /* KERNEL_U_ADDR_BSD. */
}
--- 330,336 ----
if (nlist ("/vmunix", names) == 0)
kernel_u_addr = names[0].n_value;
else
! internal_error ("Unable to get kernel u area address.");
#endif /* KERNEL_U_ADDR_BSD. */
}
Index: m3-nat.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/m3-nat.c,v
retrieving revision 2.25
diff -p -r2.25 m3-nat.c
*** m3-nat.c 1999/07/07 23:51:39 2.25
--- m3-nat.c 1999/08/06 09:16:25
*************** catch_exception_raise (port, thread, tas
*** 1683,1691 ****
}
if (exception < 0 || exception > MAX_EXCEPTION)
! fatal ("catch_exception_raise: unknown exception code %d thread %d",
! exception,
! mid);
if (!MACH_PORT_VALID (inferior_task))
error ("got an exception, but inferior_task is null or dead");
--- 1683,1691 ----
}
if (exception < 0 || exception > MAX_EXCEPTION)
! internal_error ("catch_exception_raise: unknown exception code %d thread %d",
! exception,
! mid);
if (!MACH_PORT_VALID (inferior_task))
error ("got an exception, but inferior_task is null or dead");
*************** mach3_exception_actions (w, force_print_
*** 3598,3604 ****
stop_code);
break;
default:
! fatal ("Unknown exception");
}
}
}
--- 3598,3604 ----
stop_code);
break;
default:
! internal_error ("Unknown exception");
}
}
}
*************** setup_notify_port (create_new)
*** 3624,3636 ****
MACH_PORT_RIGHT_RECEIVE,
&our_notify_port);
if (ret != KERN_SUCCESS)
! fatal ("Creating notify port %s", mach_error_string (ret));
ret = mach_port_move_member (mach_task_self (),
our_notify_port,
inferior_wait_port_set);
if (ret != KERN_SUCCESS)
! fatal ("initial move member %s", mach_error_string (ret));
}
}
--- 3624,3636 ----
MACH_PORT_RIGHT_RECEIVE,
&our_notify_port);
if (ret != KERN_SUCCESS)
! internal_error ("Creating notify port %s", mach_error_string (ret));
ret = mach_port_move_member (mach_task_self (),
our_notify_port,
inferior_wait_port_set);
if (ret != KERN_SUCCESS)
! internal_error ("initial move member %s", mach_error_string (ret));
}
}
*************** _initialize_m3_nat ()
*** 4650,4656 ****
MACH_PORT_RIGHT_PORT_SET,
&inferior_wait_port_set);
if (ret != KERN_SUCCESS)
! fatal ("initial port set %s", mach_error_string (ret));
/* mach_really_wait now waits for this */
currently_waiting_for = inferior_wait_port_set;
--- 4650,4656 ----
MACH_PORT_RIGHT_PORT_SET,
&inferior_wait_port_set);
if (ret != KERN_SUCCESS)
! internal_error ("initial port set %s", mach_error_string (ret));
/* mach_really_wait now waits for this */
currently_waiting_for = inferior_wait_port_set;
Index: remote-mips.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/remote-mips.c,v
retrieving revision 2.94
diff -p -r2.94 remote-mips.c
*** remote-mips.c 1999/07/07 23:51:42 2.94
--- remote-mips.c 1999/08/06 09:16:34
*************** mips_request (cmd, addr, data, perr, tim
*** 1279,1285 ****
if (cmd != '\0')
{
if (mips_need_reply)
! fatal ("mips_request: Trying to send command before reply");
sprintf (buff, "0x0 %c 0x%s 0x%s", cmd, paddr_nz (addr), paddr_nz (data));
mips_send_packet (buff, 1);
mips_need_reply = 1;
--- 1279,1285 ----
if (cmd != '\0')
{
if (mips_need_reply)
! internal_error ("mips_request: Trying to send command before reply");
sprintf (buff, "0x0 %c 0x%s 0x%s", cmd, paddr_nz (addr), paddr_nz (data));
mips_send_packet (buff, 1);
mips_need_reply = 1;
*************** mips_request (cmd, addr, data, perr, tim
*** 1289,1295 ****
return 0;
if (!mips_need_reply)
! fatal ("mips_request: Trying to get reply before command");
mips_need_reply = 0;
--- 1289,1295 ----
return 0;
if (!mips_need_reply)
! internal_error ("mips_request: Trying to get reply before command");
mips_need_reply = 0;
Index: remote-sim.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/remote-sim.c,v
retrieving revision 2.85
diff -p -r2.85 remote-sim.c
*** remote-sim.c 1999/07/07 23:51:49 2.85
--- remote-sim.c 1999/08/06 09:16:36
*************** gdbsim_store_register (regno)
*** 386,392 ****
read_register_gen (regno, tmp);
nr_bytes = sim_store_register (gdbsim_desc, regno, tmp, REGISTER_RAW_SIZE (regno));
if (nr_bytes > 0 && nr_bytes != REGISTER_RAW_SIZE (regno))
! fatal ("Register size different to expected");
if (sr_get_debug ())
{
printf_filtered ("gdbsim_store_register: %d", regno);
--- 386,392 ----
read_register_gen (regno, tmp);
nr_bytes = sim_store_register (gdbsim_desc, regno, tmp, REGISTER_RAW_SIZE (regno));
if (nr_bytes > 0 && nr_bytes != REGISTER_RAW_SIZE (regno))
! internal_error ("Register size different to expected");
if (sr_get_debug ())
{
printf_filtered ("gdbsim_store_register: %d", regno);
*************** gdbsim_open (args, from_tty)
*** 539,545 ****
strcat (arg_buf, " -E little");
break;
default:
! fatal ("Value of TARGET_BYTE_ORDER unknown");
}
}
/* Specify the architecture of the target when it has been
--- 539,545 ----
strcat (arg_buf, " -E little");
break;
default:
! internal_error ("Value of TARGET_BYTE_ORDER unknown");
}
}
/* Specify the architecture of the target when it has been
Index: remote-vx.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/remote-vx.c,v
retrieving revision 1.69
diff -p -r1.69 remote-vx.c
*** remote-vx.c 1999/07/07 23:51:55 1.69
--- remote-vx.c 1999/08/06 09:16:39
*************** vx_wait (pid_to_wait_for, status)
*** 1026,1033 ****
sleep_ms (200); /* FIXME Don't kill the network too badly */
}
else if (pid != inferior_pid)
! fatal ("Bad pid for debugged task: %s\n",
! local_hex_string ((unsigned long) pid));
}
while (pid == 0);
--- 1026,1033 ----
sleep_ms (200); /* FIXME Don't kill the network too badly */
}
else if (pid != inferior_pid)
! internal_error ("Bad pid for debugged task: %s\n",
! local_hex_string ((unsigned long) pid));
}
while (pid == 0);
Index: remote.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/remote.c,v
retrieving revision 1.210
diff -p -r1.210 remote.c
*** remote.c 1999/08/05 08:44:59 1.210
--- remote.c 1999/08/06 09:16:49
*************** set_packet_config_cmd (config, c)
*** 367,373 ****
config->support = PACKET_SUPPORT_UNKNOWN;
}
else
! fatal ("Bad enum value");
}
static void
--- 367,373 ----
config->support = PACKET_SUPPORT_UNKNOWN;
}
else
! internal_error ("Bad enum value");
}
static void
*************** remote_write_bytes (memaddr, myaddr, len
*** 3041,3047 ****
todo = min (len, max_buf_size / 2); /* num bytes that will fit */
break;
case PACKET_SUPPORT_UNKNOWN:
! fatal ("remote_write_bytes: bad switch");
}
p += hexnumstr (p, (ULONGEST) memaddr);
--- 3041,3047 ----
todo = min (len, max_buf_size / 2); /* num bytes that will fit */
break;
case PACKET_SUPPORT_UNKNOWN:
! internal_error ("remote_write_bytes: bad switch");
}
p += hexnumstr (p, (ULONGEST) memaddr);
*************** remote_write_bytes (memaddr, myaddr, len
*** 3105,3111 ****
break;
}
case PACKET_SUPPORT_UNKNOWN:
! fatal ("remote_write_bytes: bad switch");
}
putpkt_binary (buf, (int) (p - buf));
--- 3105,3111 ----
break;
}
case PACKET_SUPPORT_UNKNOWN:
! internal_error ("remote_write_bytes: bad switch");
}
putpkt_binary (buf, (int) (p - buf));
Index: sh-tdep.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/sh-tdep.c,v
retrieving revision 2.41
diff -p -r2.41 sh-tdep.c
*** sh-tdep.c 1999/07/07 23:52:04 2.41
--- sh-tdep.c 1999/08/06 09:16:50
*************** sh_target_architecture_hook (ap)
*** 628,634 ****
}
}
! fatal ("Architecture `%s' unreconized", ap->printable_name);
}
/* Print the registers in a form similar to the E7000 */
--- 628,634 ----
}
}
! internal_error ("Architecture `%s' unreconized", ap->printable_name);
}
/* Print the registers in a form similar to the E7000 */
Index: source.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/source.c,v
retrieving revision 1.97
diff -p -r1.97 source.c
*** source.c 1999/07/07 23:52:05 1.97
--- source.c 1999/08/06 09:16:54
*************** select_source_symtab (s)
*** 210,216 ****
{
if (cs_pst->readin)
{
! fatal ("Internal: select_source_symtab: readin pst found and no symtabs.");
}
else
{
--- 210,216 ----
{
if (cs_pst->readin)
{
! internal_error ("select_source_symtab: readin pst found and no symtabs.");
}
else
{
Index: sparc-tdep.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/sparc-tdep.c,v
retrieving revision 1.104
diff -p -r1.104 sparc-tdep.c
*** sparc-tdep.c 1999/08/05 18:58:51 1.104
--- sparc-tdep.c 1999/08/06 09:16:59
*************** setup_arbitrary_frame (argc, argv)
*** 454,460 ****
frame = create_new_frame (argv[0], 0);
if (!frame)
! fatal ("internal: create_new_frame returned invalid frame");
frame->bottom = argv[1];
frame->pc = FRAME_SAVED_PC (frame);
--- 454,460 ----
frame = create_new_frame (argv[0], 0);
if (!frame)
! internal_error ("create_new_frame returned invalid frame");
frame->bottom = argv[1];
frame->pc = FRAME_SAVED_PC (frame);
*************** sparc_frame_find_saved_regs (fi, saved_r
*** 974,980 ****
CORE_ADDR frame_addr = FRAME_FP (fi);
if (!fi)
! fatal ("Bad frame info struct in FRAME_FIND_SAVED_REGS");
memset (saved_regs_addr, 0, sizeof (*saved_regs_addr));
--- 974,980 ----
CORE_ADDR frame_addr = FRAME_FP (fi);
if (!fi)
! internal_error ("Bad frame info struct in FRAME_FIND_SAVED_REGS");
memset (saved_regs_addr, 0, sizeof (*saved_regs_addr));
Index: symm-nat.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/symm-nat.c,v
retrieving revision 2.10
diff -p -r2.10 symm-nat.c
*** symm-nat.c 1999/07/07 23:52:06 2.10
--- symm-nat.c 1999/08/06 09:17:01
*************** child_wait (pid, status)
*** 543,549 ****
}
break;
case PTS_WATCHPT_HIT:
! fatal ("PTS_WATCHPT_HIT\n");
break;
default:
/* stopped by signal */
--- 543,549 ----
}
break;
case PTS_WATCHPT_HIT:
! internal_error ("PTS_WATCHPT_HIT\n");
break;
default:
/* stopped by signal */
*************** _initialize_symm_nat ()
*** 873,880 ****
rv = mptrace (XPT_MPDEBUGGER, 0, 0, 0);
if (-1 == rv)
{
! fatal ("_initialize_symm_nat(): mptrace(XPT_MPDEBUGGER): %s",
! safe_strerror (errno));
}
/*
--- 873,880 ----
rv = mptrace (XPT_MPDEBUGGER, 0, 0, 0);
if (-1 == rv)
{
! internal_error ("_initialize_symm_nat(): mptrace(XPT_MPDEBUGGER): %s",
! safe_strerror (errno));
}
/*
*************** _initialize_symm_nat ()
*** 891,904 ****
rv = sigaddset (&set, SIGCHLD);
if (-1 == rv)
{
! fatal ("_initialize_symm_nat(): sigaddset(SIGCHLD): %s",
! safe_strerror (errno));
}
rv = sigprocmask (SIG_BLOCK, &set, (sigset_t *) NULL);
if (-1 == rv)
{
! fatal ("_initialize_symm_nat(): sigprocmask(SIG_BLOCK): %s",
! safe_strerror (errno));
}
sact.sa_handler = sigchld_handler;
--- 891,904 ----
rv = sigaddset (&set, SIGCHLD);
if (-1 == rv)
{
! internal_error ("_initialize_symm_nat(): sigaddset(SIGCHLD): %s",
! safe_strerror (errno));
}
rv = sigprocmask (SIG_BLOCK, &set, (sigset_t *) NULL);
if (-1 == rv)
{
! internal_error ("_initialize_symm_nat(): sigprocmask(SIG_BLOCK): %s",
! safe_strerror (errno));
}
sact.sa_handler = sigchld_handler;
*************** _initialize_symm_nat ()
*** 907,914 ****
rv = sigaction (SIGCHLD, &sact, (struct sigaction *) NULL);
if (-1 == rv)
{
! fatal ("_initialize_symm_nat(): sigaction(SIGCHLD): %s",
! safe_strerror (errno));
}
#endif
}
--- 907,914 ----
rv = sigaction (SIGCHLD, &sact, (struct sigaction *) NULL);
if (-1 == rv)
{
! internal_error ("_initialize_symm_nat(): sigaction(SIGCHLD): %s",
! safe_strerror (errno));
}
#endif
}
Index: top.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/top.c,v
retrieving revision 2.146
diff -p -r2.146 top.c
*** top.c 1999/08/04 10:00:50 2.146
--- top.c 1999/08/06 09:17:10
*************** arg_cleanup ()
*** 1163,1169 ****
{
struct user_args *oargs = user_args;
if (!user_args)
! fatal ("Internal error, arg_cleanup called with no user args.\n");
user_args = user_args->next;
free (oargs);
--- 1163,1169 ----
{
struct user_args *oargs = user_args;
if (!user_args)
! internal_error ("Internal error, arg_cleanup called with no user args.\n");
user_args = user_args->next;
free (oargs);
Index: utils.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/utils.c,v
retrieving revision 1.194
diff -p -r1.194 utils.c
*** utils.c 1999/07/11 16:26:22 1.194
--- utils.c 1999/08/06 09:17:15
*************** static void malloc_botch PARAMS ((void))
*** 66,74 ****
#endif
static void
- fatal_dump_core PARAMS ((char *,...));
-
- static void
prompt_for_continue PARAMS ((void));
static void
--- 66,71 ----
*************** error (va_alist)
*** 523,592 ****
}
}
-
- /* Print an error message and exit reporting failure.
- This is for a error that we cannot continue from.
- The arguments are printed a la printf.
! This function cannot be declared volatile (NORETURN) in an
! ANSI environment because exit() is not declared volatile. */
- /* VARARGS */
NORETURN void
! #ifdef ANSI_PROTOTYPES
! fatal (char *string,...)
! #else
! fatal (va_alist)
! va_dcl
! #endif
{
va_list args;
- #ifdef ANSI_PROTOTYPES
- va_start (args, string);
- #else
- char *string;
- va_start (args);
- string = va_arg (args, char *);
- #endif
- fprintf_unfiltered (gdb_stderr, "\ngdb: ");
- vfprintf_unfiltered (gdb_stderr, string, args);
- fprintf_unfiltered (gdb_stderr, "\n");
- va_end (args);
- exit (1);
- }
! /* Print an error message and exit, dumping core.
! The arguments are printed a la printf (). */
! /* VARARGS */
! static void
! #ifdef ANSI_PROTOTYPES
! fatal_dump_core (char *string,...)
! #else
! fatal_dump_core (va_alist)
! va_dcl
! #endif
! {
! va_list args;
! #ifdef ANSI_PROTOTYPES
va_start (args, string);
- #else
- char *string;
-
- va_start (args);
- string = va_arg (args, char *);
- #endif
- /* "internal error" is always correct, since GDB should never dump
- core, no matter what the input. */
- fprintf_unfiltered (gdb_stderr, "\ngdb internal error: ");
vfprintf_unfiltered (gdb_stderr, string, args);
- fprintf_unfiltered (gdb_stderr, "\n");
va_end (args);
! signal (SIGQUIT, SIG_DFL);
! kill (getpid (), SIGQUIT);
! /* We should never get here, but just in case... */
! exit (1);
}
/* The strerror() function can return NULL for errno values that are
--- 520,566 ----
}
}
! /* Print a message reporting an internal error. Ask the user if they
! want to continue, dump core, or just exit. */
NORETURN void
! internal_error (char *string,...)
{
+ static char msg[] = "Internal GDB error: recursive internal error.\n";
+ static int dejavu = 0;
va_list args;
! /* don't allow infinite error recursion. */
! switch (dejavu)
! {
! case 0:
! dejavu = 1;
! break;
! case 1:
! dejavu = 2;
! fputs_unfiltered (msg, gdb_stderr);
! abort ();
! default:
! dejavu = 3;
! write (3, msg, sizeof (msg));
! abort ();
! }
! /* Try to get the message out */
! fputs_unfiltered ("\nGDB-INTERNAL-ERROR: ", gdb_stderr);
va_start (args, string);
vfprintf_unfiltered (gdb_stderr, string, args);
va_end (args);
+ fputs_unfiltered ("\n", gdb_stderr);
+
+ if (query ("\
+ An internal GDB error has been detected.\n\
+ Do you want to quit GDB (dumping core)? "))
+ abort ();
! dejavu = 0;
! return_to_top_level (RETURN_ERROR);
}
/* The strerror() function can return NULL for errno values that are
*************** init_malloc (md)
*** 847,853 ****
static void
malloc_botch ()
{
! fatal_dump_core ("Memory corruption");
}
/* Attempt to install hooks in mmalloc/mrealloc/mfree for the heap specified
--- 821,828 ----
static void
malloc_botch ()
{
! fprintf_unfiltered (gdb_stderr, "Memory corruption\n");
! abort ();
}
/* Attempt to install hooks in mmalloc/mrealloc/mfree for the heap specified
*************** nomem (size)
*** 898,908 ****
{
if (size > 0)
{
! fatal ("virtual memory exhausted: can't allocate %ld bytes.", size);
}
else
{
! fatal ("virtual memory exhausted.");
}
}
--- 873,883 ----
{
if (size > 0)
{
! internal_error ("virtual memory exhausted: can't allocate %ld bytes.", size);
}
else
{
! internal_error ("virtual memory exhausted.");
}
}
Index: v850-tdep.c
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/v850-tdep.c,v
retrieving revision 2.17
diff -p -r2.17 v850-tdep.c
*** v850-tdep.c 1999/07/07 23:52:08 2.17
--- v850-tdep.c 1999/08/06 09:17:17
*************** v850_target_architecture_hook (ap)
*** 873,879 ****
}
}
! fatal ("Architecture `%s' unreconized", ap->printable_name);
}
void
--- 873,879 ----
}
}
! internal_error ("Architecture `%s' unreconized", ap->printable_name);
}
void