From 1406caf7abf3e0d0334defd1a695aa764b5a83c8 Mon Sep 17 00:00:00 2001 From: Andrew Cagney Date: Sat, 1 Dec 2001 22:02:03 +0000 Subject: [PATCH] Zap all but ns32k-netbsd NS32k targets and hosts. --- gdb/ChangeLog | 25 +++ gdb/Makefile.in | 8 - gdb/NEWS | 2 + gdb/config/ns32k/merlin.mh | 16 -- gdb/config/ns32k/merlin.mt | 3 - gdb/config/ns32k/nm-umax.h | 55 ------ gdb/config/ns32k/ns32km3.mh | 7 - gdb/config/ns32k/ns32km3.mt | 3 - gdb/config/ns32k/tm-merlin.h | 289 --------------------------- gdb/config/ns32k/tm-ns32km3.h | 74 ------- gdb/config/ns32k/umax.mh | 5 - gdb/config/ns32k/umax.mt | 3 - gdb/config/ns32k/xm-merlin.h | 67 ------- gdb/config/ns32k/xm-ns32km3.h | 25 --- gdb/config/ns32k/xm-umax.h | 26 --- gdb/configure.host | 3 - gdb/configure.tgt | 3 - gdb/ns32k-tdep.c | 54 ----- gdb/ns32km3-nat.c | 183 ----------------- gdb/ultra3-nat.c | 363 ---------------------------------- gdb/ultra3-xdep.c | 138 ------------- gdb/umax-xdep.c | 133 ------------- 22 files changed, 27 insertions(+), 1458 deletions(-) delete mode 100644 gdb/config/ns32k/merlin.mh delete mode 100644 gdb/config/ns32k/merlin.mt delete mode 100644 gdb/config/ns32k/nm-umax.h delete mode 100644 gdb/config/ns32k/ns32km3.mh delete mode 100644 gdb/config/ns32k/ns32km3.mt delete mode 100644 gdb/config/ns32k/tm-merlin.h delete mode 100644 gdb/config/ns32k/tm-ns32km3.h delete mode 100644 gdb/config/ns32k/umax.mh delete mode 100644 gdb/config/ns32k/umax.mt delete mode 100644 gdb/config/ns32k/xm-merlin.h delete mode 100644 gdb/config/ns32k/xm-ns32km3.h delete mode 100644 gdb/config/ns32k/xm-umax.h delete mode 100644 gdb/ns32km3-nat.c delete mode 100644 gdb/ultra3-nat.c delete mode 100644 gdb/ultra3-xdep.c delete mode 100644 gdb/umax-xdep.c diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 46967282b9b..c405da8937c 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,30 @@ 2001-12-01 Andrew Cagney + * NEWS: Note that ns32k-*-mach3*, ns32k-umax-*, ns32k-utek-sysv* + and ns32k-utek-* were deleted. + * Makefile.in (ultra3-nat.o, ultra3-xdep.o): Delete. + (umax-xdep.o, ns32km3-nat.o): Delete. + * configure.tgt: Delete ns32k-*-mach3*, ns32k-utek-sysv* and + ns32k-utek-* targets. + * configure.host: Delete ns32k-*-mach3*, ns32k-umax-* and + ns32k-utek-sysv* hosts. + * ultra3-nat.c: Delete file. + * ultra3-xdep.c: Delete file. + * umax-xdep.o: Delete file. + * ns32km3-nat: Delete file. + * config/ns32k/merlin.mh: Delete file. + * config/ns32k/merlin.mt: Delete file. + * config/ns32k/nm-umax.h: Delete file. + * config/ns32k/ns32km3.mh: Delete file. + * config/ns32k/ns32km3.mt: Delete file. + * config/ns32k/tm-merlin.h: Delete file. + * config/ns32k/tm-ns32km3.h: Delete file. + * config/ns32k/umax.mh: Delete file. + * config/ns32k/umax.mt: Delete file. + * config/ns32k/xm-merlin.h: Delete file. + * config/ns32k/xm-ns32km3.h: Delete file. + * config/ns32k/xm-umax.h: Delete file. + * NEWS: Note that m88*-harris-cxux* was deleted. * configure.host: Delete m88*-harris-cxux* host. * configure.tgt: Delete m88*-harris-cxux* target. diff --git a/gdb/Makefile.in b/gdb/Makefile.in index d52063d54fe..61158482ea5 100644 --- a/gdb/Makefile.in +++ b/gdb/Makefile.in @@ -1769,8 +1769,6 @@ nlmread.o: nlmread.c $(bfd_h) $(buildsym_h) $(complaints_h) $(defs_h) \ $(gdb_stabs_h) $(objfiles_h) $(symfile_h) $(symtab_h) $(stabsread_h) \ $(gdb_string_h) -# OBSOLETE ns32km3-nat.o: ns32km3-nat.c $(defs_h) $(inferior_h) $(regcache_h) - ttyflush.o: nindy-share/ttyflush.c $(CC) -c $(INTERNAL_CFLAGS) $(srcdir)/nindy-share/ttyflush.c @@ -2108,12 +2106,6 @@ typeprint.o: typeprint.c $(defs_h) $(expression_h) $(gdbcmd_h) \ $(gdbcore_h) $(gdbtypes_h) $(language_h) $(symtab_h) $(target_h) \ $(value_h) $(gdb_string_h) $(cp_abi_h) -# OBSOLETE ultra3-nat.o: ultra3-nat.c $(defs_h) $(gdbcore_h) $(inferior_h) $(regcache_h) - -# OBSOLETE ultra3-xdep.o: ultra3-xdep.c $(defs_h) $(gdbcore_h) $(inferior_h) - -# OBSOLETE umax-xdep.o: umax-xdep.c $(defs_h) $(gdbcore_h) $(inferior_h) $(regcache_h) - utils.o: utils.c $(bfd_h) $(defs_h) $(expression_h) $(gdbcmd_h) \ $(language_h) $(target_h) $(terminal_h) $(readline_headers) \ $(gdb_string_h) $(event_loop_h) $(event_top_h) diff --git a/gdb/NEWS b/gdb/NEWS index 2d7af1ee564..9ce7dbeaec0 100644 --- a/gdb/NEWS +++ b/gdb/NEWS @@ -15,6 +15,8 @@ PowerPC Solaris powerpcle-*-solaris* PowerPC Windows NT powerpcle-*-cygwin32 PowerPC Netware powerpc-*-netware* Harris/CXUX m88k m88*-harris-cxux* +Most ns32k hosts and targets ns32k-*-mach3* ns32k-umax-* + ns32k-utek-sysv* ns32k-utek-* * Changes to command line processing diff --git a/gdb/config/ns32k/merlin.mh b/gdb/config/ns32k/merlin.mh deleted file mode 100644 index 9da8f1eae80..00000000000 --- a/gdb/config/ns32k/merlin.mh +++ /dev/null @@ -1,16 +0,0 @@ -# OBSOLETE # Host: Merlin running utek 2.1 -# OBSOLETE XDEPFILES= infptrace.o inftarg.o fork-child.o corelow.o core-aout.o -# OBSOLETE XM_FILE= xm-merlin.h -# OBSOLETE -# OBSOLETE # FIXME: M_INSTALL is gone from the gdb makefile. If anyone cares -# OBSOLETE # about the Merlin anymore, and the bug which inspired -# OBSOLETE # SHELL_FILE/gdb-sh is still there, will need to reinstate it. Also, -# OBSOLETE # this should be done for native only. -# OBSOLETE -# OBSOLETE # See SHELL_FILE in xm-merlin.h for a explanation of this. -# OBSOLETE -# OBSOLETE # FIXME: This should use $prefix, but only if SHELL_FILE does too. -# OBSOLETE -# OBSOLETE M_INSTALL=cp /bin/sh /usr/local/lib/gdb-sh; \ -# OBSOLETE chmod ogu+rw /usr/local/lib/gdb-sh -# OBSOLETE M_UNINSTALL = rm -f /usr/local/lib/gdb-sh diff --git a/gdb/config/ns32k/merlin.mt b/gdb/config/ns32k/merlin.mt deleted file mode 100644 index a105c140e2b..00000000000 --- a/gdb/config/ns32k/merlin.mt +++ /dev/null @@ -1,3 +0,0 @@ -# OBSOLETE # Target: Merlin running utek 2.1 -# OBSOLETE TDEPFILES= ns32k-tdep.o -# OBSOLETE TM_FILE= tm-merlin.h diff --git a/gdb/config/ns32k/nm-umax.h b/gdb/config/ns32k/nm-umax.h deleted file mode 100644 index 7124420845e..00000000000 --- a/gdb/config/ns32k/nm-umax.h +++ /dev/null @@ -1,55 +0,0 @@ -/* OBSOLETE /* Definitions to make GDB run on an encore under umax 4.2 */ -/* OBSOLETE Copyright 1987, 1989, 1992, 2001 Free Software Foundation, Inc. */ -/* OBSOLETE */ -/* OBSOLETE This file is part of GDB. */ -/* OBSOLETE */ -/* OBSOLETE This program is free software; you can redistribute it and/or modify */ -/* OBSOLETE it under the terms of the GNU General Public License as published by */ -/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ -/* OBSOLETE (at your option) any later version. */ -/* OBSOLETE */ -/* OBSOLETE This program is distributed in the hope that it will be useful, */ -/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ -/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ -/* OBSOLETE GNU General Public License for more details. */ -/* OBSOLETE */ -/* OBSOLETE You should have received a copy of the GNU General Public License */ -/* OBSOLETE along with this program; if not, write to the Free Software */ -/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ -/* OBSOLETE Boston, MA 02111-1307, USA. */ */ -/* OBSOLETE */ -/* OBSOLETE /* Do implement the attach and detach commands... */ */ -/* OBSOLETE #define ATTACH_DETACH */ -/* OBSOLETE */ -/* OBSOLETE /* Offset of registers within u area. */ */ -/* OBSOLETE #define U_REGS_OFFSET 0 */ -/* OBSOLETE */ -/* OBSOLETE /* called from register_addr() -- blockend not used for now */ */ -/* OBSOLETE #define REGISTER_U_ADDR(addr, blockend, regno) \ */ -/* OBSOLETE { \ */ -/* OBSOLETE switch (regno) { \ */ -/* OBSOLETE case 0: case 1: case 2: case 3: case 4: case 5: case 6: case 7: \ */ -/* OBSOLETE addr = PU_R0 - (regno * sizeof (int)); break; \ */ -/* OBSOLETE case SP_REGNUM: \ */ -/* OBSOLETE addr = PU_SP; break; \ */ -/* OBSOLETE case PC_REGNUM: \ */ -/* OBSOLETE addr = PU_PC; break; \ */ -/* OBSOLETE case FP_REGNUM: \ */ -/* OBSOLETE addr = PU_FP; break; \ */ -/* OBSOLETE case PS_REGNUM: \ */ -/* OBSOLETE addr = PU_PSL; break; \ */ -/* OBSOLETE case FPS_REGNUM: \ */ -/* OBSOLETE addr = PU_FSR; break; \ */ -/* OBSOLETE case FP0_REGNUM + 0: case FP0_REGNUM + 1: \ */ -/* OBSOLETE case FP0_REGNUM + 2: case FP0_REGNUM + 3: \ */ -/* OBSOLETE case FP0_REGNUM + 4: case FP0_REGNUM + 5: \ */ -/* OBSOLETE case FP0_REGNUM + 6: case FP0_REGNUM + 7: \ */ -/* OBSOLETE addr = PU_F0 + (regno - FP0_REGNUM) * sizeof (float); break; \ */ -/* OBSOLETE case LP0_REGNUM + 0: case LP0_REGNUM + 1: \ */ -/* OBSOLETE case LP0_REGNUM + 2: case LP0_REGNUM + 3: \ */ -/* OBSOLETE addr = PU_F0 + (regno - LP0_REGNUM) * sizeof (double); break; \ */ -/* OBSOLETE default: \ */ -/* OBSOLETE printf ("bad argument to REGISTER_U_ADDR %d\n", regno); \ */ -/* OBSOLETE internal_error (__FILE__, __LINE__, "failed internal consistency check"); \ */ -/* OBSOLETE } \ */ -/* OBSOLETE } */ diff --git a/gdb/config/ns32k/ns32km3.mh b/gdb/config/ns32k/ns32km3.mh deleted file mode 100644 index 7514751195c..00000000000 --- a/gdb/config/ns32k/ns32km3.mh +++ /dev/null @@ -1,7 +0,0 @@ -# OBSOLETE # Host: ns32k running Mach3 -# OBSOLETE -# OBSOLETE XDEPFILES= -# OBSOLETE NATDEPFILES= m3-nat.o ns32km3-nat.o fork-child.o corelow.o core-aout.o -# OBSOLETE NAT_CLIBS= -L/usr/mach/lib -lnetname -lmachid -lmach -# OBSOLETE XM_FILE= xm-ns32km3.h -# OBSOLETE NAT_FILE= nm-m3.h diff --git a/gdb/config/ns32k/ns32km3.mt b/gdb/config/ns32k/ns32km3.mt deleted file mode 100644 index f9d0fa073f3..00000000000 --- a/gdb/config/ns32k/ns32km3.mt +++ /dev/null @@ -1,3 +0,0 @@ -# OBSOLETE # Target: ns32k with a.out on Mach 3 -# OBSOLETE TDEPFILES= ns32k-tdep.o -# OBSOLETE TM_FILE= tm-ns32km3.h diff --git a/gdb/config/ns32k/tm-merlin.h b/gdb/config/ns32k/tm-merlin.h deleted file mode 100644 index 8c88f461793..00000000000 --- a/gdb/config/ns32k/tm-merlin.h +++ /dev/null @@ -1,289 +0,0 @@ -/* OBSOLETE /* Definitions to target GDB to a merlin under utek 2.1 */ -/* OBSOLETE Copyright 1986, 1987, 1989, 1991, 1993, 1994, 1998, 1999, 2000 */ -/* OBSOLETE Free Software Foundation, Inc. */ -/* OBSOLETE */ -/* OBSOLETE This file is part of GDB. */ -/* OBSOLETE */ -/* OBSOLETE This program is free software; you can redistribute it and/or modify */ -/* OBSOLETE it under the terms of the GNU General Public License as published by */ -/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ -/* OBSOLETE (at your option) any later version. */ -/* OBSOLETE */ -/* OBSOLETE This program is distributed in the hope that it will be useful, */ -/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ -/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ -/* OBSOLETE GNU General Public License for more details. */ -/* OBSOLETE */ -/* OBSOLETE You should have received a copy of the GNU General Public License */ -/* OBSOLETE along with this program; if not, write to the Free Software */ -/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ -/* OBSOLETE Boston, MA 02111-1307, USA. */ */ -/* OBSOLETE */ -/* OBSOLETE #include "regcache.h" */ -/* OBSOLETE */ -/* OBSOLETE #define TARGET_BYTE_ORDER LITTLE_ENDIAN */ -/* OBSOLETE */ -/* OBSOLETE /* Offset from address of function to start of its code. */ -/* OBSOLETE Zero on most machines. */ */ -/* OBSOLETE */ -/* OBSOLETE #define FUNCTION_START_OFFSET 0 */ -/* OBSOLETE */ -/* OBSOLETE /* Advance PC across any function entry prologue instructions */ -/* OBSOLETE to reach some "real" code. */ */ -/* OBSOLETE */ -/* OBSOLETE extern CORE_ADDR merlin_skip_prologue (CORE_ADDR); */ -/* OBSOLETE #define SKIP_PROLOGUE(pc) (merlin_skip_prologue (pc)) */ -/* OBSOLETE */ -/* OBSOLETE /* Immediately after a function call, return the saved pc. */ -/* OBSOLETE Can't always go through the frames for this because on some machines */ -/* OBSOLETE the new frame is not set up until the new function executes */ -/* OBSOLETE some instructions. */ */ -/* OBSOLETE */ -/* OBSOLETE #define SAVED_PC_AFTER_CALL(frame) \ */ -/* OBSOLETE read_memory_integer (read_register (SP_REGNUM), 4) */ -/* OBSOLETE */ -/* OBSOLETE /* Address of end of stack space. */ */ -/* OBSOLETE */ -/* OBSOLETE #define STACK_END_ADDR (0x800000) */ -/* OBSOLETE */ -/* OBSOLETE /* Stack grows downward. */ */ -/* OBSOLETE */ -/* OBSOLETE #define INNER_THAN(lhs,rhs) ((lhs) < (rhs)) */ -/* OBSOLETE */ -/* OBSOLETE /* Sequence of bytes for breakpoint instruction. */ */ -/* OBSOLETE */ -/* OBSOLETE #define BREAKPOINT {0xf2} */ -/* OBSOLETE */ -/* OBSOLETE /* Amount PC must be decremented by after a breakpoint. */ -/* OBSOLETE This is often the number of bytes in BREAKPOINT */ -/* OBSOLETE but not always. */ */ -/* OBSOLETE */ -/* OBSOLETE #define DECR_PC_AFTER_BREAK 0 */ -/* OBSOLETE */ -/* OBSOLETE /* Define this to say that the "svc" insn is followed by */ -/* OBSOLETE codes in memory saying which kind of system call it is. */ */ -/* OBSOLETE */ -/* OBSOLETE #define NS32K_SVC_IMMED_OPERANDS */ -/* OBSOLETE */ -/* OBSOLETE /* Say how long (ordinary) registers are. This is a piece of bogosity */ -/* OBSOLETE used in push_word and a few other places; REGISTER_RAW_SIZE is the */ -/* OBSOLETE real way to know how big a register is. */ */ -/* OBSOLETE */ -/* OBSOLETE #define REGISTER_SIZE 4 */ -/* OBSOLETE */ -/* OBSOLETE /* Number of machine registers */ */ -/* OBSOLETE */ -/* OBSOLETE #define NUM_REGS 25 */ -/* OBSOLETE */ -/* OBSOLETE #define NUM_GENERAL_REGS 8 */ -/* OBSOLETE */ -/* OBSOLETE /* Initializer for an array of names of registers. */ -/* OBSOLETE There should be NUM_REGS strings in this initializer. */ */ -/* OBSOLETE */ -/* OBSOLETE #define REGISTER_NAMES {"r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", \ */ -/* OBSOLETE "pc", "sp", "fp", "ps", \ */ -/* OBSOLETE "fsr", \ */ -/* OBSOLETE "f0", "f1", "f2", "f3", "f4", "f5", "f6", "f7", \ */ -/* OBSOLETE "l0", "l1", "l2", "l3", "l4", \ */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* Register numbers of various important registers. */ -/* OBSOLETE Note that some of these values are "real" register numbers, */ -/* OBSOLETE and correspond to the general registers of the machine, */ -/* OBSOLETE and some are "phony" register numbers which are too large */ -/* OBSOLETE to be actual register numbers as far as the user is concerned */ -/* OBSOLETE but do serve to get the desired values when passed to read_register. */ */ -/* OBSOLETE */ -/* OBSOLETE #define AP_REGNUM FP_REGNUM */ -/* OBSOLETE #define FP_REGNUM 10 /* Contains address of executing stack frame */ */ -/* OBSOLETE #define SP_REGNUM 9 /* Contains address of top of stack */ */ -/* OBSOLETE #define PC_REGNUM 8 /* Contains program counter */ */ -/* OBSOLETE #define PS_REGNUM 11 /* Contains processor status */ */ -/* OBSOLETE #define FPS_REGNUM 12 /* Floating point status register */ */ -/* OBSOLETE #define FP0_REGNUM 13 /* Floating point register 0 */ */ -/* OBSOLETE #define LP0_REGNUM 21 /* Double register 0 (same as FP0) */ */ -/* OBSOLETE */ -/* OBSOLETE /* Total amount of space needed to store our copies of the machine's */ -/* OBSOLETE register state, the array `registers'. */ */ -/* OBSOLETE #define REGISTER_BYTES ((NUM_REGS - 4) * sizeof (int) + 4 * sizeof (double)) */ -/* OBSOLETE */ -/* OBSOLETE /* Index within `registers' of the first byte of the space for */ -/* OBSOLETE register N. */ */ -/* OBSOLETE */ -/* OBSOLETE #define REGISTER_BYTE(N) ((N) >= LP0_REGNUM ? \ */ -/* OBSOLETE LP0_REGNUM * 4 + ((N) - LP0_REGNUM) * 8 : (N) * 4) */ -/* OBSOLETE */ -/* OBSOLETE /* Number of bytes of storage in the actual machine representation */ -/* OBSOLETE for register N. On the 32000, all regs are 4 bytes */ -/* OBSOLETE except for the doubled floating registers. */ */ -/* OBSOLETE */ -/* OBSOLETE #define REGISTER_RAW_SIZE(N) ((N) >= LP0_REGNUM ? 8 : 4) */ -/* OBSOLETE */ -/* OBSOLETE /* Number of bytes of storage in the program's representation */ -/* OBSOLETE for register N. On the 32000, all regs are 4 bytes */ -/* OBSOLETE except for the doubled floating registers. */ */ -/* OBSOLETE */ -/* OBSOLETE #define REGISTER_VIRTUAL_SIZE(N) ((N) >= LP0_REGNUM ? 8 : 4) */ -/* OBSOLETE */ -/* OBSOLETE /* Largest value REGISTER_RAW_SIZE can have. */ */ -/* OBSOLETE */ -/* OBSOLETE #define MAX_REGISTER_RAW_SIZE 8 */ -/* OBSOLETE */ -/* OBSOLETE /* Largest value REGISTER_VIRTUAL_SIZE can have. */ */ -/* OBSOLETE */ -/* OBSOLETE #define MAX_REGISTER_VIRTUAL_SIZE 8 */ -/* OBSOLETE */ -/* OBSOLETE /* Return the GDB type object for the "standard" data type */ -/* OBSOLETE of data in register N. */ */ -/* OBSOLETE */ -/* OBSOLETE #define REGISTER_VIRTUAL_TYPE(N) \ */ -/* OBSOLETE ((N) >= FP0_REGNUM ? \ */ -/* OBSOLETE ((N) >= LP0_REGNUM ? \ */ -/* OBSOLETE builtin_type_double \ */ -/* OBSOLETE : builtin_type_float) \ */ -/* OBSOLETE : builtin_type_int) */ -/* OBSOLETE */ -/* OBSOLETE /* Store the address of the place in which to copy the structure the */ -/* OBSOLETE subroutine will return. This is called from call_function. */ -/* OBSOLETE */ -/* OBSOLETE On this machine this is a no-op, as gcc doesn't run on it yet. */ -/* OBSOLETE This calling convention is not used. */ */ -/* OBSOLETE */ -/* OBSOLETE #define STORE_STRUCT_RETURN(ADDR, SP) */ -/* OBSOLETE */ -/* OBSOLETE /* Extract from an array REGBUF containing the (raw) register state */ -/* OBSOLETE a function return value of type TYPE, and copy that, in virtual format, */ -/* OBSOLETE into VALBUF. */ */ -/* OBSOLETE */ -/* OBSOLETE #define EXTRACT_RETURN_VALUE(TYPE,REGBUF,VALBUF) \ */ -/* OBSOLETE memcpy (VALBUF, REGBUF, TYPE_LENGTH (TYPE)) */ -/* OBSOLETE */ -/* OBSOLETE /* Write into appropriate registers a function return value */ -/* OBSOLETE of type TYPE, given in virtual format. */ */ -/* OBSOLETE */ -/* OBSOLETE #define STORE_RETURN_VALUE(TYPE,VALBUF) \ */ -/* OBSOLETE write_register_bytes (0, VALBUF, TYPE_LENGTH (TYPE)) */ -/* OBSOLETE */ -/* OBSOLETE /* Extract from an array REGBUF containing the (raw) register state */ -/* OBSOLETE the address in which a function should return its structure value, */ -/* OBSOLETE as a CORE_ADDR (or an expression that can be used as one). */ */ -/* OBSOLETE */ -/* OBSOLETE #define EXTRACT_STRUCT_VALUE_ADDRESS(REGBUF) (*(int *)(REGBUF)) */ -/* OBSOLETE */ -/* OBSOLETE /* Describe the pointer in each stack frame to the previous stack frame */ -/* OBSOLETE (its caller). */ */ -/* OBSOLETE */ -/* OBSOLETE /* FRAME_CHAIN takes a frame's nominal address */ -/* OBSOLETE and produces the frame's chain-pointer. */ */ -/* OBSOLETE */ -/* OBSOLETE /* In the case of the Merlin, the frame's nominal address is the FP value, */ -/* OBSOLETE and at that address is saved previous FP value as a 4-byte word. */ */ -/* OBSOLETE */ -/* OBSOLETE #define FRAME_CHAIN(thisframe) \ */ -/* OBSOLETE (!inside_entry_file ((thisframe)->pc) ? \ */ -/* OBSOLETE read_memory_integer ((thisframe)->frame, 4) :\ */ -/* OBSOLETE 0) */ -/* OBSOLETE */ -/* OBSOLETE /* Define other aspects of the stack frame. */ */ -/* OBSOLETE */ -/* OBSOLETE #define FRAME_SAVED_PC(FRAME) (read_memory_integer ((FRAME)->frame + 4, 4)) */ -/* OBSOLETE */ -/* OBSOLETE /* compute base of arguments */ */ -/* OBSOLETE #define FRAME_ARGS_ADDRESS(fi) ((fi)->frame) */ -/* OBSOLETE */ -/* OBSOLETE #define FRAME_LOCALS_ADDRESS(fi) ((fi)->frame) */ -/* OBSOLETE */ -/* OBSOLETE /* Return number of args passed to a frame. */ -/* OBSOLETE Can return -1, meaning no way to tell. */ */ -/* OBSOLETE */ -/* OBSOLETE extern int merlin_frame_num_args (struct frame_info *fi); */ -/* OBSOLETE #define FRAME_NUM_ARGS(fi) (merlin_frame_num_args ((fi))) */ -/* OBSOLETE */ -/* OBSOLETE /* Return number of bytes at start of arglist that are not really args. */ */ -/* OBSOLETE */ -/* OBSOLETE #define FRAME_ARGS_SKIP 8 */ -/* OBSOLETE */ -/* OBSOLETE /* Put here the code to store, into a struct frame_saved_regs, */ -/* OBSOLETE the addresses of the saved registers of frame described by FRAME_INFO. */ -/* OBSOLETE This includes special registers such as pc and fp saved in special */ -/* OBSOLETE ways in the stack frame. sp is even more special: */ -/* OBSOLETE the address we return for it IS the sp for the next frame. */ */ -/* OBSOLETE */ -/* OBSOLETE #define FRAME_FIND_SAVED_REGS(frame_info, frame_saved_regs) \ */ -/* OBSOLETE { int regmask,regnum; \ */ -/* OBSOLETE int localcount; \ */ -/* OBSOLETE CORE_ADDR enter_addr; \ */ -/* OBSOLETE CORE_ADDR next_addr; \ */ -/* OBSOLETE \ */ -/* OBSOLETE enter_addr = get_pc_function_start ((frame_info)->pc); \ */ -/* OBSOLETE regmask = read_memory_integer (enter_addr+1, 1); \ */ -/* OBSOLETE localcount = ns32k_localcount (enter_addr); \ */ -/* OBSOLETE next_addr = (frame_info)->frame + localcount; \ */ -/* OBSOLETE for (regnum = 0; regnum < 8; regnum++, regmask >>= 1) \ */ -/* OBSOLETE (frame_saved_regs).regs[regnum] \ */ -/* OBSOLETE = (regmask & 1) ? (next_addr -= 4) : 0; \ */ -/* OBSOLETE (frame_saved_regs).regs[SP_REGNUM] = (frame_info)->frame + 4; \ */ -/* OBSOLETE (frame_saved_regs).regs[PC_REGNUM] = (frame_info)->frame + 4; \ */ -/* OBSOLETE (frame_saved_regs).regs[FP_REGNUM] \ */ -/* OBSOLETE = read_memory_integer ((frame_info)->frame, 4); } */ -/* OBSOLETE */ -/* OBSOLETE */ -/* OBSOLETE /* Things needed for making the inferior call functions. */ */ -/* OBSOLETE */ -/* OBSOLETE /* Push an empty stack frame, to record the current PC, etc. */ */ -/* OBSOLETE */ -/* OBSOLETE #define PUSH_DUMMY_FRAME \ */ -/* OBSOLETE { register CORE_ADDR sp = read_register (SP_REGNUM); \ */ -/* OBSOLETE register int regnum; \ */ -/* OBSOLETE sp = push_word (sp, read_register (PC_REGNUM)); \ */ -/* OBSOLETE sp = push_word (sp, read_register (FP_REGNUM)); \ */ -/* OBSOLETE write_register (FP_REGNUM, sp); \ */ -/* OBSOLETE for (regnum = 0; regnum < 8; regnum++) \ */ -/* OBSOLETE sp = push_word (sp, read_register (regnum)); \ */ -/* OBSOLETE write_register (SP_REGNUM, sp); \ */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* Discard from the stack the innermost frame, restoring all registers. */ */ -/* OBSOLETE */ -/* OBSOLETE #define POP_FRAME \ */ -/* OBSOLETE { register struct frame_info *frame = get_current_frame (); \ */ -/* OBSOLETE register CORE_ADDR fp; \ */ -/* OBSOLETE register int regnum; \ */ -/* OBSOLETE struct frame_saved_regs fsr; \ */ -/* OBSOLETE struct frame_info *fi; \ */ -/* OBSOLETE fp = frame->frame; \ */ -/* OBSOLETE get_frame_saved_regs (frame, &fsr); \ */ -/* OBSOLETE for (regnum = 0; regnum < 8; regnum++) \ */ -/* OBSOLETE if (fsr.regs[regnum]) \ */ -/* OBSOLETE write_register (regnum, read_memory_integer (fsr.regs[regnum], 4)); \ */ -/* OBSOLETE write_register (FP_REGNUM, read_memory_integer (fp, 4)); \ */ -/* OBSOLETE write_register (PC_REGNUM, read_memory_integer (fp + 4, 4)); \ */ -/* OBSOLETE write_register (SP_REGNUM, fp + 8); \ */ -/* OBSOLETE flush_cached_frames (); \ */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* This sequence of words is the instructions */ -/* OBSOLETE enter 0xff,0 82 ff 00 */ -/* OBSOLETE jsr @0x00010203 7f ae c0 01 02 03 */ -/* OBSOLETE adjspd 0x69696969 7f a5 01 02 03 04 */ -/* OBSOLETE bpt f2 */ -/* OBSOLETE Note this is 16 bytes. */ */ -/* OBSOLETE */ -/* OBSOLETE #define CALL_DUMMY { 0x7f00ff82, 0x0201c0ae, 0x01a57f03, 0xf2040302 } */ -/* OBSOLETE */ -/* OBSOLETE #define CALL_DUMMY_START_OFFSET 3 */ -/* OBSOLETE #define CALL_DUMMY_LENGTH 16 */ -/* OBSOLETE #define CALL_DUMMY_ADDR 5 */ -/* OBSOLETE #define CALL_DUMMY_NARGS 11 */ -/* OBSOLETE */ -/* OBSOLETE /* Insert the specified number of args and function address */ -/* OBSOLETE into a call sequence of the above form stored at DUMMYNAME. */ */ -/* OBSOLETE */ -/* OBSOLETE #define FIX_CALL_DUMMY(dummyname, pc, fun, nargs, args, type, gcc_p) \ */ -/* OBSOLETE { int flipped = fun | 0xc0000000; \ */ -/* OBSOLETE flip_bytes (&flipped, 4); \ */ -/* OBSOLETE *((int *) (((char *) dummyname)+CALL_DUMMY_ADDR)) = flipped; \ */ -/* OBSOLETE flipped = - nargs * 4; \ */ -/* OBSOLETE flip_bytes (&flipped, 4); \ */ -/* OBSOLETE *((int *) (((char *) dummyname)+CALL_DUMMY_NARGS)) = flipped; \ */ -/* OBSOLETE } */ diff --git a/gdb/config/ns32k/tm-ns32km3.h b/gdb/config/ns32k/tm-ns32km3.h deleted file mode 100644 index f1926572cff..00000000000 --- a/gdb/config/ns32k/tm-ns32km3.h +++ /dev/null @@ -1,74 +0,0 @@ -/* OBSOLETE /* Macro definitions for ns532, Mach 3.0 */ -/* OBSOLETE Copyright 1992, 1993, 1994 Free Software Foundation, Inc. */ -/* OBSOLETE */ -/* OBSOLETE This file is part of GDB. */ -/* OBSOLETE */ -/* OBSOLETE This program is free software; you can redistribute it and/or modify */ -/* OBSOLETE it under the terms of the GNU General Public License as published by */ -/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ -/* OBSOLETE (at your option) any later version. */ -/* OBSOLETE */ -/* OBSOLETE This program is distributed in the hope that it will be useful, */ -/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ -/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ -/* OBSOLETE GNU General Public License for more details. */ -/* OBSOLETE */ -/* OBSOLETE You should have received a copy of the GNU General Public License */ -/* OBSOLETE along with this program; if not, write to the Free Software */ -/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ -/* OBSOLETE Boston, MA 02111-1307, USA. */ */ -/* OBSOLETE */ -/* OBSOLETE /* Include common definitions for Mach3 systems */ */ -/* OBSOLETE #include "nm-m3.h" */ -/* OBSOLETE */ -/* OBSOLETE /* Define offsets to access CPROC stack when it does not have */ -/* OBSOLETE * a kernel thread. */ -/* OBSOLETE */ */ -/* OBSOLETE #define MACHINE_CPROC_SP_OFFSET 20 */ -/* OBSOLETE #define MACHINE_CPROC_PC_OFFSET 16 */ -/* OBSOLETE #define MACHINE_CPROC_FP_OFFSET 12 */ -/* OBSOLETE */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE */ -/* OBSOLETE /* Thread flavors used in re-setting the T bit. */ -/* OBSOLETE * @@ this is also bad for cross debugging. */ -/* OBSOLETE */ */ -/* OBSOLETE #define TRACE_FLAVOR NS532_THREAD_STATE */ -/* OBSOLETE #define TRACE_FLAVOR_SIZE NS532_THREAD_STATE_COUNT */ -/* OBSOLETE #define TRACE_SET(x,state) \ */ -/* OBSOLETE ((struct ns532_thread_state *)state)->psr |= PSR_T */ -/* OBSOLETE #define TRACE_CLEAR(x,state) \ */ -/* OBSOLETE ((((struct ns532_thread_state *)state)->psr &= ~PSR_T), 1) */ -/* OBSOLETE */ -/* OBSOLETE /* we can do it */ */ -/* OBSOLETE #define ATTACH_DETACH 1 */ -/* OBSOLETE */ -/* OBSOLETE /* Address of end of stack space. */ -/* OBSOLETE * for MACH, see */ -/* OBSOLETE */ */ -/* OBSOLETE #define STACK_END_ADDR USRSTACK */ -/* OBSOLETE */ -/* OBSOLETE #include "ns32k/tm-umax.h" */ -/* OBSOLETE */ -/* OBSOLETE /* tm-umax.h assumes a 32082 fpu. We have a 32382 fpu. */ */ -/* OBSOLETE #undef REGISTER_NAMES */ -/* OBSOLETE #undef NUM_REGS */ -/* OBSOLETE #undef REGISTER_BYTES */ -/* OBSOLETE /* Initializer for an array of names of registers. */ -/* OBSOLETE There should be NUM_REGS strings in this initializer. */ */ -/* OBSOLETE */ -/* OBSOLETE #define REGISTER_NAMES {"r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", \ */ -/* OBSOLETE "f0", "f1", "f2", "f3", "f4", "f5", "f6", "f7", \ */ -/* OBSOLETE "sp", "fp", "pc", "ps", \ */ -/* OBSOLETE "fsr", \ */ -/* OBSOLETE "l0", "l1", "l2", "l3", "l4", "l5", "l6", "l7", "xx", \ */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE #define NUM_REGS 29 */ -/* OBSOLETE */ -/* OBSOLETE /* Total amount of space needed to store our copies of the machine's */ -/* OBSOLETE register state, the array `registers'. */ */ -/* OBSOLETE #define REGISTER_BYTES \ */ -/* OBSOLETE ((NUM_REGS - 4) * REGISTER_RAW_SIZE(R0_REGNUM) \ */ -/* OBSOLETE + 8 * REGISTER_RAW_SIZE(LP0_REGNUM)) */ diff --git a/gdb/config/ns32k/umax.mh b/gdb/config/ns32k/umax.mh deleted file mode 100644 index 741fe0aae99..00000000000 --- a/gdb/config/ns32k/umax.mh +++ /dev/null @@ -1,5 +0,0 @@ -# OBSOLETE # Host: Encore running umax 4.2 -# OBSOLETE XDEPFILES= umax-xdep.o -# OBSOLETE XM_FILE= xm-umax.h -# OBSOLETE NAT_FILE= nm-umax.h -# OBSOLETE NATDEPFILES= infptrace.o inftarg.o fork-child.o diff --git a/gdb/config/ns32k/umax.mt b/gdb/config/ns32k/umax.mt deleted file mode 100644 index 00987f1d9c3..00000000000 --- a/gdb/config/ns32k/umax.mt +++ /dev/null @@ -1,3 +0,0 @@ -# OBSOLETE # Target: Encore running umax 4.2 -# OBSOLETE TDEPFILES= ns32k-tdep.o -# OBSOLETE TM_FILE= tm-umax.h diff --git a/gdb/config/ns32k/xm-merlin.h b/gdb/config/ns32k/xm-merlin.h deleted file mode 100644 index e2dacbe81a4..00000000000 --- a/gdb/config/ns32k/xm-merlin.h +++ /dev/null @@ -1,67 +0,0 @@ -/* OBSOLETE /* Definitions to make GDB run on a merlin under utek 2.1 */ -/* OBSOLETE Copyright 1986, 1987, 1989, 1991, 1992, 1993, 2001 */ -/* OBSOLETE Free Software Foundation, Inc. */ -/* OBSOLETE */ -/* OBSOLETE This file is part of GDB. */ -/* OBSOLETE */ -/* OBSOLETE This program is free software; you can redistribute it and/or modify */ -/* OBSOLETE it under the terms of the GNU General Public License as published by */ -/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ -/* OBSOLETE (at your option) any later version. */ -/* OBSOLETE */ -/* OBSOLETE This program is distributed in the hope that it will be useful, */ -/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ -/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ -/* OBSOLETE GNU General Public License for more details. */ -/* OBSOLETE */ -/* OBSOLETE You should have received a copy of the GNU General Public License */ -/* OBSOLETE along with this program; if not, write to the Free Software */ -/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ -/* OBSOLETE Boston, MA 02111-1307, USA. */ */ -/* OBSOLETE */ -/* OBSOLETE #include */ -/* OBSOLETE */ -/* OBSOLETE /* This machine doesn't have the siginterrupt call. */ */ -/* OBSOLETE #define NO_SIGINTERRUPT */ -/* OBSOLETE */ -/* OBSOLETE /* Under Utek, a ptrace'd process can be the only active process for */ -/* OBSOLETE an executable. Therefore instead of /bin/sh use gdb-sh (which should */ -/* OBSOLETE just be a copy of /bin/sh which is world readable and writeable). */ */ -/* OBSOLETE /* FIXME: name should be passed in from Makefile so it can use prefix. */ */ -/* OBSOLETE #define SHELL_FILE "/usr/local/lib/gdb-sh" */ -/* OBSOLETE */ -/* OBSOLETE #define HOST_BYTE_ORDER LITTLE_ENDIAN */ -/* OBSOLETE */ -/* OBSOLETE /* This is the amount to subtract from u.u_ar0 */ -/* OBSOLETE to get the offset in the core file of the register values. */ */ -/* OBSOLETE */ -/* OBSOLETE #define KERNEL_U_ADDR (0xfef000) */ -/* OBSOLETE */ -/* OBSOLETE #define REGISTER_U_ADDR(addr, blockend, regno) \ */ -/* OBSOLETE { \ */ -/* OBSOLETE switch (regno) { \ */ -/* OBSOLETE case 0: case 1: case 2: case 3: case 4: case 5: case 6: case 7: \ */ -/* OBSOLETE addr = blockend + (R0 - regno) * sizeof (int); break; \ */ -/* OBSOLETE case PC_REGNUM: \ */ -/* OBSOLETE addr = blockend + PC * sizeof (int); break; \ */ -/* OBSOLETE case SP_REGNUM: \ */ -/* OBSOLETE addr = blockend + SP * sizeof (int); break; \ */ -/* OBSOLETE case FP_REGNUM: \ */ -/* OBSOLETE addr = blockend + FP * sizeof (int); break; \ */ -/* OBSOLETE case PS_REGNUM: \ */ -/* OBSOLETE addr = blockend + 12 * sizeof (int); break; \ */ -/* OBSOLETE case FPS_REGNUM: \ */ -/* OBSOLETE addr = 108; break; \ */ -/* OBSOLETE case FP0_REGNUM + 0: case FP0_REGNUM + 1: \ */ -/* OBSOLETE case FP0_REGNUM + 2: case FP0_REGNUM + 3: \ */ -/* OBSOLETE case FP0_REGNUM + 4: case FP0_REGNUM + 5: \ */ -/* OBSOLETE case FP0_REGNUM + 6: case FP0_REGNUM + 7: \ */ -/* OBSOLETE addr = 76 + (regno - FP0_REGNUM) * sizeof (float); break; \ */ -/* OBSOLETE case LP0_REGNUM + 0: case LP0_REGNUM + 1: \ */ -/* OBSOLETE case LP0_REGNUM + 2: case LP0_REGNUM + 3: \ */ -/* OBSOLETE addr = 76 + (regno - LP0_REGNUM) * sizeof (double); break; \ */ -/* OBSOLETE default: \ */ -/* OBSOLETE printf ("bad argument to REGISTER_U_ADDR %d\n", regno); \ */ -/* OBSOLETE internal_error (__FILE__, __LINE__, "failed internal consistency check"); \ */ -/* OBSOLETE } \ */ -/* OBSOLETE } */ diff --git a/gdb/config/ns32k/xm-ns32km3.h b/gdb/config/ns32k/xm-ns32km3.h deleted file mode 100644 index ab4b8a4c935..00000000000 --- a/gdb/config/ns32k/xm-ns32km3.h +++ /dev/null @@ -1,25 +0,0 @@ -/* OBSOLETE /* Definitions to make GDB run on Mach 3 on an National ns32k */ -/* OBSOLETE Copyright 1986, 1987, 1989, 1991, 1993, 1994, 1995, 1996 */ -/* OBSOLETE Free Software Foundation, Inc. */ -/* OBSOLETE */ -/* OBSOLETE This file is part of GDB. */ -/* OBSOLETE */ -/* OBSOLETE This program is free software; you can redistribute it and/or modify */ -/* OBSOLETE it under the terms of the GNU General Public License as published by */ -/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ -/* OBSOLETE (at your option) any later version. */ -/* OBSOLETE */ -/* OBSOLETE This program is distributed in the hope that it will be useful, */ -/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ -/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ -/* OBSOLETE GNU General Public License for more details. */ -/* OBSOLETE */ -/* OBSOLETE You should have received a copy of the GNU General Public License */ -/* OBSOLETE along with this program; if not, write to the Free Software */ -/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ -/* OBSOLETE Boston, MA 02111-1307, USA. */ */ -/* OBSOLETE */ -/* OBSOLETE #define HOST_BYTE_ORDER LITTLE_ENDIAN */ -/* OBSOLETE */ -/* OBSOLETE /* Do implement the attach and detach commands. */ */ -/* OBSOLETE #define ATTACH_DETACH 1 */ diff --git a/gdb/config/ns32k/xm-umax.h b/gdb/config/ns32k/xm-umax.h deleted file mode 100644 index 8fe762d7ab2..00000000000 --- a/gdb/config/ns32k/xm-umax.h +++ /dev/null @@ -1,26 +0,0 @@ -/* OBSOLETE /* Definitions to make GDB run on an encore under umax 4.2 */ -/* OBSOLETE Copyright 1987, 1989, 1992 Free Software Foundation, Inc. */ -/* OBSOLETE */ -/* OBSOLETE This file is part of GDB. */ -/* OBSOLETE */ -/* OBSOLETE This program is free software; you can redistribute it and/or modify */ -/* OBSOLETE it under the terms of the GNU General Public License as published by */ -/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ -/* OBSOLETE (at your option) any later version. */ -/* OBSOLETE */ -/* OBSOLETE This program is distributed in the hope that it will be useful, */ -/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ -/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ -/* OBSOLETE GNU General Public License for more details. */ -/* OBSOLETE */ -/* OBSOLETE You should have received a copy of the GNU General Public License */ -/* OBSOLETE along with this program; if not, write to the Free Software */ -/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ -/* OBSOLETE Boston, MA 02111-1307, USA. */ */ -/* OBSOLETE */ -/* OBSOLETE #define HOST_BYTE_ORDER LITTLE_ENDIAN */ -/* OBSOLETE */ -/* OBSOLETE #define HAVE_WAIT_STRUCT */ -/* OBSOLETE */ -/* OBSOLETE /* Doesn't have siginterupt. */ */ -/* OBSOLETE #define NO_SIGINTERRUPT */ diff --git a/gdb/configure.host b/gdb/configure.host index 8cb6df4e33d..9fa931f96b8 100644 --- a/gdb/configure.host +++ b/gdb/configure.host @@ -127,10 +127,7 @@ mips-*-riscos*) gdb_host=riscos ;; none-*-*) gdb_host=none ;; -# OBSOLETE ns32k-*-mach3*) gdb_host=ns32km3 ;; ns32k-*-netbsd*) gdb_host=nbsd ;; -# OBSOLETE ns32k-umax-*) gdb_host=umax ;; -# OBSOLETE ns32k-utek-sysv*) gdb_host=merlin ;; powerpc-*-aix*) gdb_host=aix ;; powerpc-*-linux*) gdb_host=linux ;; diff --git a/gdb/configure.tgt b/gdb/configure.tgt index fc82b639f5f..e38a83ff142 100644 --- a/gdb/configure.tgt +++ b/gdb/configure.tgt @@ -226,11 +226,8 @@ mn10300-*-*) gdb_target=mn10300 ;; none-*-*) gdb_target=none ;; -# OBSOLETE ns32k-*-mach3*) gdb_target=ns32km3 ;; ns32k-*-netbsd*) gdb_target=nbsd configdirs="${configdirs} gdbserver" ;; -# OBSOLETE ns32k-utek-sysv*) gdb_target=merlin ;; -# OBSOLETE ns32k-utek-*) gdb_target=umax ;; powerpc-*-macos*) gdb_target=macos ;; powerpc-*-netbsd*) gdb_target=nbsd diff --git a/gdb/ns32k-tdep.c b/gdb/ns32k-tdep.c index 825247fbdf3..e9bbfc479a9 100644 --- a/gdb/ns32k-tdep.c +++ b/gdb/ns32k-tdep.c @@ -34,23 +34,6 @@ _initialize_ns32k_tdep (void) /* Advance PC across any function entry prologue instructions to reach some "real" code. */ -/* OBSOLETE CORE_ADDR */ -/* OBSOLETE merlin_skip_prologue (CORE_ADDR pc) */ -/* OBSOLETE { */ -/* OBSOLETE register int op = read_memory_integer (pc, 1); */ -/* OBSOLETE if (op == 0x82) */ -/* OBSOLETE { */ -/* OBSOLETE op = read_memory_integer (pc + 2, 1); */ -/* OBSOLETE if ((op & 0x80) == 0) */ -/* OBSOLETE pc += 3; */ -/* OBSOLETE else if ((op & 0xc0) == 0x80) */ -/* OBSOLETE pc += 4; */ -/* OBSOLETE else */ -/* OBSOLETE pc += 6; */ -/* OBSOLETE } */ -/* OBSOLETE return pc; */ -/* OBSOLETE } */ - CORE_ADDR umax_skip_prologue (CORE_ADDR pc) { @@ -68,43 +51,6 @@ umax_skip_prologue (CORE_ADDR pc) return pc; } -/* Return number of args passed to a frame. - Can return -1, meaning no way to tell. */ - -/* OBSOLETE int */ -/* OBSOLETE merlin_frame_num_args (struct frame_info *fi) */ -/* OBSOLETE { */ -/* OBSOLETE int numargs; */ -/* OBSOLETE CORE_ADDR pc; */ -/* OBSOLETE int insn; */ -/* OBSOLETE int addr_mode; */ -/* OBSOLETE int width; */ -/* OBSOLETE */ -/* OBSOLETE pc = FRAME_SAVED_PC (fi); */ -/* OBSOLETE insn = read_memory_integer (pc, 2); */ -/* OBSOLETE addr_mode = (insn >> 11) & 0x1f; */ -/* OBSOLETE insn = insn & 0x7ff; */ -/* OBSOLETE if ((insn & 0x7fc) == 0x57c */ -/* OBSOLETE && addr_mode == 0x14) *//* immediate */ -/* OBSOLETE { */ -/* OBSOLETE if (insn == 0x57c) *//* adjspb */ -/* OBSOLETE width = 1; */ -/* OBSOLETE else if (insn == 0x57d) *//* adjspw */ -/* OBSOLETE width = 2; */ -/* OBSOLETE else if (insn == 0x57f) *//* adjspd */ -/* OBSOLETE width = 4; */ -/* OBSOLETE else */ -/* OBSOLETE internal_error (__FILE__, __LINE__, "bad else"); */ -/* OBSOLETE numargs = read_memory_integer (pc + 2, width); */ -/* OBSOLETE if (width > 1) */ -/* OBSOLETE flip_bytes (&numargs, width); */ -/* OBSOLETE numargs = -sign_extend (numargs, width * 8) / 4; */ -/* OBSOLETE } */ -/* OBSOLETE else */ -/* OBSOLETE numargs = -1; */ -/* OBSOLETE return numargs; */ -/* OBSOLETE } */ - /* Return number of args passed to a frame. Can return -1, meaning no way to tell. Encore's C compiler often reuses same area on stack for args, diff --git a/gdb/ns32km3-nat.c b/gdb/ns32km3-nat.c deleted file mode 100644 index 0d189758775..00000000000 --- a/gdb/ns32km3-nat.c +++ /dev/null @@ -1,183 +0,0 @@ -/* OBSOLETE /* Low level interface to ns532 running mach 3.0. */ -/* OBSOLETE Copyright 1992, 1993, 1998, 2000, 2001 Free Software Foundation, Inc. */ -/* OBSOLETE */ -/* OBSOLETE This file is part of GDB. */ -/* OBSOLETE */ -/* OBSOLETE This program is free software; you can redistribute it and/or modify */ -/* OBSOLETE it under the terms of the GNU General Public License as published by */ -/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ -/* OBSOLETE (at your option) any later version. */ -/* OBSOLETE */ -/* OBSOLETE This program is distributed in the hope that it will be useful, */ -/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ -/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ -/* OBSOLETE GNU General Public License for more details. */ -/* OBSOLETE */ -/* OBSOLETE You should have received a copy of the GNU General Public License */ -/* OBSOLETE along with this program; if not, write to the Free Software */ -/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ -/* OBSOLETE Boston, MA 02111-1307, USA. */ */ -/* OBSOLETE */ -/* OBSOLETE#include "defs.h" */ -/* OBSOLETE#include "inferior.h" */ -/* OBSOLETE#include "regcache.h" */ -/* OBSOLETE */ -/* OBSOLETE#include */ -/* OBSOLETE */ -/* OBSOLETE#include */ -/* OBSOLETE#include */ -/* OBSOLETE#include */ -/* OBSOLETE#include */ -/* OBSOLETE */ -/* OBSOLETE#define private static */ -/* OBSOLETE */ -/* OBSOLETE */ -/* OBSOLETE/* Find offsets to thread states at compile time. */ -/* OBSOLETE * If your compiler does not grok this, calculate offsets */ -/* OBSOLETE * offsets yourself and use them (or get a compatible compiler :-) */ -/* OBSOLETE */ */ -/* OBSOLETE */ -/* OBSOLETE#define REG_N_OFFSET(reg) (int)(&((struct ns532_combined_state *)0)->ts.reg) */ -/* OBSOLETE#define REG_F_OFFSET(reg) (int)(&((struct ns532_combined_state *)0)->fs.reg) */ -/* OBSOLETE */ -/* OBSOLETE/* at reg_offset[i] is the offset to the ns532_combined_state */ -/* OBSOLETE * location where the gdb registers[i] is stored. */ -/* OBSOLETE */ */ -/* OBSOLETE */ -/* OBSOLETEstatic int reg_offset[] = */ -/* OBSOLETE{ */ -/* OBSOLETE REG_N_OFFSET (r0), REG_N_OFFSET (r1), REG_N_OFFSET (r2), REG_N_OFFSET (r3), */ -/* OBSOLETE REG_N_OFFSET (r4), REG_N_OFFSET (r5), REG_N_OFFSET (r6), REG_N_OFFSET (r7), */ -/* OBSOLETE REG_F_OFFSET (l0a), REG_F_OFFSET (l0b), REG_F_OFFSET (l2a), REG_F_OFFSET (l2b), */ -/* OBSOLETE REG_F_OFFSET (l4a), REG_F_OFFSET (l4b), REG_F_OFFSET (l6a), REG_F_OFFSET (l6b), */ -/* OBSOLETEREG_N_OFFSET (sp), REG_N_OFFSET (fp), REG_N_OFFSET (pc), REG_N_OFFSET (psr), */ -/* OBSOLETE REG_F_OFFSET (fsr), */ -/* OBSOLETE REG_F_OFFSET (l0a), REG_F_OFFSET (l1a), REG_F_OFFSET (l2a), REG_F_OFFSET (l3a), */ -/* OBSOLETE REG_F_OFFSET (l4a), REG_F_OFFSET (l5a), REG_F_OFFSET (l6a), REG_F_OFFSET (l7a), */ -/* OBSOLETE}; */ -/* OBSOLETE */ -/* OBSOLETE#define REG_ADDRESS(state,regnum) ((char *)(state)+reg_offset[regnum]) */ -/* OBSOLETE */ -/* OBSOLETE/* Fetch COUNT contiguous registers from thread STATE starting from REGNUM */ -/* OBSOLETE * Caller knows that the regs handled in one transaction are of same size. */ -/* OBSOLETE */ */ -/* OBSOLETE#define FETCH_REGS(state, regnum, count) \ */ -/* OBSOLETE memcpy (®isters[REGISTER_BYTE (regnum)], \ */ -/* OBSOLETE (char *)state+reg_offset[ regnum ], \ */ -/* OBSOLETE count*REGISTER_SIZE) */ -/* OBSOLETE */ -/* OBSOLETE/* Store COUNT contiguous registers to thread STATE starting from REGNUM */ */ -/* OBSOLETE#define STORE_REGS(state, regnum, count) \ */ -/* OBSOLETE memcpy ((char *)state+reg_offset[ regnum ], \ */ -/* OBSOLETE ®isters[REGISTER_BYTE (regnum)], \ */ -/* OBSOLETE count*REGISTER_SIZE) */ -/* OBSOLETE */ -/* OBSOLETE/* */ -/* OBSOLETE * Fetch inferiors registers for gdb. */ -/* OBSOLETE * REGNO specifies which (as gdb views it) register, -1 for all. */ -/* OBSOLETE */ */ -/* OBSOLETE */ -/* OBSOLETEvoid */ -/* OBSOLETEfetch_inferior_registers (int regno) */ -/* OBSOLETE{ */ -/* OBSOLETE kern_return_t ret; */ -/* OBSOLETE thread_state_data_t state; */ -/* OBSOLETE unsigned int stateCnt = NS532_COMBINED_STATE_COUNT; */ -/* OBSOLETE int index; */ -/* OBSOLETE */ -/* OBSOLETE if (!MACH_PORT_VALID (current_thread)) */ -/* OBSOLETE error ("fetch inferior registers: Invalid thread"); */ -/* OBSOLETE */ -/* OBSOLETE if (must_suspend_thread) */ -/* OBSOLETE setup_thread (current_thread, 1); */ -/* OBSOLETE */ -/* OBSOLETE ret = thread_get_state (current_thread, */ -/* OBSOLETE NS532_COMBINED_STATE, */ -/* OBSOLETE state, */ -/* OBSOLETE &stateCnt); */ -/* OBSOLETE */ -/* OBSOLETE if (ret != KERN_SUCCESS) */ -/* OBSOLETE warning ("fetch_inferior_registers: %s ", */ -/* OBSOLETE mach_error_string (ret)); */ -/* OBSOLETE#if 0 */ -/* OBSOLETE /* It may be more effective to store validate all of them, */ -/* OBSOLETE * since we fetched them all anyway */ -/* OBSOLETE */ */ -/* OBSOLETE else if (regno != -1) */ -/* OBSOLETE supply_register (regno, (char *) state + reg_offset[regno]); */ -/* OBSOLETE#endif */ -/* OBSOLETE else */ -/* OBSOLETE { */ -/* OBSOLETE for (index = 0; index < NUM_REGS; index++) */ -/* OBSOLETE supply_register (index, (char *) state + reg_offset[index]); */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE if (must_suspend_thread) */ -/* OBSOLETE setup_thread (current_thread, 0); */ -/* OBSOLETE} */ -/* OBSOLETE */ -/* OBSOLETE/* Store our register values back into the inferior. */ -/* OBSOLETE * If REGNO is -1, do this for all registers. */ -/* OBSOLETE * Otherwise, REGNO specifies which register */ -/* OBSOLETE * */ -/* OBSOLETE * On mach3 all registers are always saved in one call. */ -/* OBSOLETE */ */ -/* OBSOLETEvoid */ -/* OBSOLETEstore_inferior_registers (int regno) */ -/* OBSOLETE{ */ -/* OBSOLETE kern_return_t ret; */ -/* OBSOLETE thread_state_data_t state; */ -/* OBSOLETE unsigned int stateCnt = NS532_COMBINED_STATE_COUNT; */ -/* OBSOLETE register int index; */ -/* OBSOLETE */ -/* OBSOLETE if (!MACH_PORT_VALID (current_thread)) */ -/* OBSOLETE error ("store inferior registers: Invalid thread"); */ -/* OBSOLETE */ -/* OBSOLETE if (must_suspend_thread) */ -/* OBSOLETE setup_thread (current_thread, 1); */ -/* OBSOLETE */ -/* OBSOLETE /* Fetch the state of the current thread */ */ -/* OBSOLETE ret = thread_get_state (current_thread, */ -/* OBSOLETE NS532_COMBINED_STATE, */ -/* OBSOLETE state, */ -/* OBSOLETE &stateCnt); */ -/* OBSOLETE */ -/* OBSOLETE if (ret != KERN_SUCCESS) */ -/* OBSOLETE { */ -/* OBSOLETE warning ("store_inferior_registers (get): %s", */ -/* OBSOLETE mach_error_string (ret)); */ -/* OBSOLETE if (must_suspend_thread) */ -/* OBSOLETE setup_thread (current_thread, 0); */ -/* OBSOLETE return; */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* move gdb's registers to thread's state */ -/* OBSOLETE */ -/* OBSOLETE * Since we save all registers anyway, save the ones */ -/* OBSOLETE * that gdb thinks are valid (e.g. ignore the regno */ -/* OBSOLETE * parameter) */ -/* OBSOLETE */ */ -/* OBSOLETE#if 0 */ -/* OBSOLETE if (regno != -1) */ -/* OBSOLETE STORE_REGS (state, regno, 1); */ -/* OBSOLETE else */ -/* OBSOLETE#endif */ -/* OBSOLETE { */ -/* OBSOLETE for (index = 0; index < NUM_REGS; index++) */ -/* OBSOLETE STORE_REGS (state, index, 1); */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* Write gdb's current view of register to the thread */ -/* OBSOLETE */ */ -/* OBSOLETE ret = thread_set_state (current_thread, */ -/* OBSOLETE NS532_COMBINED_STATE, */ -/* OBSOLETE state, */ -/* OBSOLETE NS532_COMBINED_STATE_COUNT); */ -/* OBSOLETE */ -/* OBSOLETE if (ret != KERN_SUCCESS) */ -/* OBSOLETE warning ("store_inferior_registers (set): %s", */ -/* OBSOLETE mach_error_string (ret)); */ -/* OBSOLETE */ -/* OBSOLETE if (must_suspend_thread) */ -/* OBSOLETE setup_thread (current_thread, 0); */ -/* OBSOLETE} */ diff --git a/gdb/ultra3-nat.c b/gdb/ultra3-nat.c deleted file mode 100644 index e38a42f7474..00000000000 --- a/gdb/ultra3-nat.c +++ /dev/null @@ -1,363 +0,0 @@ -/* OBSOLETE /* Native-dependent code for GDB, for NYU Ultra3 running Sym1 OS. */ -/* OBSOLETE Copyright 1988, 1989, 1991, 1992, 1995, 1996, 1999, 2000, 2001 */ -/* OBSOLETE Free Software Foundation, Inc. */ -/* OBSOLETE Contributed by David Wood (wood@nyu.edu) at New York University. */ -/* OBSOLETE */ -/* OBSOLETE This file is part of GDB. */ -/* OBSOLETE */ -/* OBSOLETE This program is free software; you can redistribute it and/or modify */ -/* OBSOLETE it under the terms of the GNU General Public License as published by */ -/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ -/* OBSOLETE (at your option) any later version. */ -/* OBSOLETE */ -/* OBSOLETE This program is distributed in the hope that it will be useful, */ -/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ -/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ -/* OBSOLETE GNU General Public License for more details. */ -/* OBSOLETE */ -/* OBSOLETE You should have received a copy of the GNU General Public License */ -/* OBSOLETE along with this program; if not, write to the Free Software */ -/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ -/* OBSOLETE Boston, MA 02111-1307, USA. */ */ -/* OBSOLETE */ -/* OBSOLETE #define DEBUG */ -/* OBSOLETE #include "defs.h" */ -/* OBSOLETE #include "frame.h" */ -/* OBSOLETE #include "inferior.h" */ -/* OBSOLETE #include "symtab.h" */ -/* OBSOLETE #include "value.h" */ -/* OBSOLETE #include "regcache.h" */ -/* OBSOLETE */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE */ -/* OBSOLETE #include "gdbcore.h" */ -/* OBSOLETE */ -/* OBSOLETE #include */ -/* OBSOLETE #include "gdb_stat.h" */ -/* OBSOLETE */ -/* OBSOLETE static void fetch_core_registers (char *, unsigned, int, CORE_ADDR); */ -/* OBSOLETE */ -/* OBSOLETE /* Assumes support for AMD's Binary Compatibility Standard */ -/* OBSOLETE for ptrace(). If you define ULTRA3, the ultra3 extensions to */ -/* OBSOLETE ptrace() are used allowing the reading of more than one register */ -/* OBSOLETE at a time. */ -/* OBSOLETE */ -/* OBSOLETE This file assumes KERNEL_DEBUGGING is turned off. This means */ -/* OBSOLETE that if the user/gdb tries to read gr64-gr95 or any of the */ -/* OBSOLETE protected special registers we silently return -1 (see the */ -/* OBSOLETE CANNOT_STORE/FETCH_REGISTER macros). */ */ -/* OBSOLETE #define ULTRA3 */ -/* OBSOLETE */ -/* OBSOLETE #if !defined (offsetof) */ -/* OBSOLETE #define offsetof(TYPE, MEMBER) ((unsigned long) &((TYPE *)0)->MEMBER) */ -/* OBSOLETE #endif */ -/* OBSOLETE */ -/* OBSOLETE extern int errno; */ -/* OBSOLETE struct ptrace_user pt_struct; */ -/* OBSOLETE */ -/* OBSOLETE /* Get all available registers from the inferior. Registers that are */ -/* OBSOLETE * defined in REGISTER_NAMES, but not available to the user/gdb are */ -/* OBSOLETE * supplied as -1. This may include gr64-gr95 and the protected special */ -/* OBSOLETE * purpose registers. */ -/* OBSOLETE */ */ -/* OBSOLETE */ -/* OBSOLETE void */ -/* OBSOLETE fetch_inferior_registers (int regno) */ -/* OBSOLETE { */ -/* OBSOLETE register int i, j, ret_val = 0; */ -/* OBSOLETE char buf[128]; */ -/* OBSOLETE */ -/* OBSOLETE if (regno != -1) */ -/* OBSOLETE { */ -/* OBSOLETE fetch_register (regno); */ -/* OBSOLETE return; */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* Global Registers */ */ -/* OBSOLETE #ifdef ULTRA3 */ -/* OBSOLETE errno = 0; */ -/* OBSOLETE ptrace (PT_READ_STRUCT, PIDGET (inferior_ptid), */ -/* OBSOLETE (PTRACE_ARG3_TYPE) register_addr (GR96_REGNUM, 0), */ -/* OBSOLETE (int) &pt_struct.pt_gr[0], 32 * 4); */ -/* OBSOLETE if (errno != 0) */ -/* OBSOLETE { */ -/* OBSOLETE perror_with_name ("reading global registers"); */ -/* OBSOLETE ret_val = -1; */ -/* OBSOLETE } */ -/* OBSOLETE else */ -/* OBSOLETE for (regno = GR96_REGNUM, j = 0; j < 32; regno++, j++) */ -/* OBSOLETE { */ -/* OBSOLETE supply_register (regno, &pt_struct.pt_gr[j]); */ -/* OBSOLETE } */ -/* OBSOLETE #else */ -/* OBSOLETE for (regno = GR96_REGNUM; !ret_val && regno < GR96_REGNUM + 32; regno++) */ -/* OBSOLETE fetch_register (regno); */ -/* OBSOLETE #endif */ -/* OBSOLETE */ -/* OBSOLETE /* Local Registers */ */ -/* OBSOLETE #ifdef ULTRA3 */ -/* OBSOLETE errno = 0; */ -/* OBSOLETE ptrace (PT_READ_STRUCT, PIDGET (inferior_ptid), */ -/* OBSOLETE (PTRACE_ARG3_TYPE) register_addr (LR0_REGNUM, 0), */ -/* OBSOLETE (int) &pt_struct.pt_lr[0], 128 * 4); */ -/* OBSOLETE if (errno != 0) */ -/* OBSOLETE { */ -/* OBSOLETE perror_with_name ("reading local registers"); */ -/* OBSOLETE ret_val = -1; */ -/* OBSOLETE } */ -/* OBSOLETE else */ -/* OBSOLETE for (regno = LR0_REGNUM, j = 0; j < 128; regno++, j++) */ -/* OBSOLETE { */ -/* OBSOLETE supply_register (regno, &pt_struct.pt_lr[j]); */ -/* OBSOLETE } */ -/* OBSOLETE #else */ -/* OBSOLETE for (regno = LR0_REGNUM; !ret_val && regno < LR0_REGNUM + 128; regno++) */ -/* OBSOLETE fetch_register (regno); */ -/* OBSOLETE #endif */ -/* OBSOLETE */ -/* OBSOLETE /* Special Registers */ */ -/* OBSOLETE fetch_register (GR1_REGNUM); */ -/* OBSOLETE fetch_register (CPS_REGNUM); */ -/* OBSOLETE fetch_register (PC_REGNUM); */ -/* OBSOLETE fetch_register (NPC_REGNUM); */ -/* OBSOLETE fetch_register (PC2_REGNUM); */ -/* OBSOLETE fetch_register (IPC_REGNUM); */ -/* OBSOLETE fetch_register (IPA_REGNUM); */ -/* OBSOLETE fetch_register (IPB_REGNUM); */ -/* OBSOLETE fetch_register (Q_REGNUM); */ -/* OBSOLETE fetch_register (BP_REGNUM); */ -/* OBSOLETE fetch_register (FC_REGNUM); */ -/* OBSOLETE */ -/* OBSOLETE /* Fake any registers that are in REGISTER_NAMES, but not available to gdb */ */ -/* OBSOLETE registers_fetched (); */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* Store our register values back into the inferior. */ -/* OBSOLETE * If REGNO is -1, do this for all registers. */ -/* OBSOLETE * Otherwise, REGNO specifies which register (so we can save time). */ -/* OBSOLETE * NOTE: Assumes AMD's binary compatibility standard. */ -/* OBSOLETE */ */ -/* OBSOLETE */ -/* OBSOLETE void */ -/* OBSOLETE store_inferior_registers (int regno) */ -/* OBSOLETE { */ -/* OBSOLETE register unsigned int regaddr; */ -/* OBSOLETE char buf[80]; */ -/* OBSOLETE */ -/* OBSOLETE if (regno >= 0) */ -/* OBSOLETE { */ -/* OBSOLETE if (CANNOT_STORE_REGISTER (regno)) */ -/* OBSOLETE return; */ -/* OBSOLETE regaddr = register_addr (regno, 0); */ -/* OBSOLETE errno = 0; */ -/* OBSOLETE ptrace (PT_WRITE_U, PIDGET (inferior_ptid), */ -/* OBSOLETE (PTRACE_ARG3_TYPE) regaddr, read_register (regno)); */ -/* OBSOLETE if (errno != 0) */ -/* OBSOLETE { */ -/* OBSOLETE sprintf (buf, "writing register %s (#%d)", REGISTER_NAME (regno), regno); */ -/* OBSOLETE perror_with_name (buf); */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE else */ -/* OBSOLETE { */ -/* OBSOLETE #ifdef ULTRA3 */ -/* OBSOLETE pt_struct.pt_gr1 = read_register (GR1_REGNUM); */ -/* OBSOLETE for (regno = GR96_REGNUM; regno < GR96_REGNUM + 32; regno++) */ -/* OBSOLETE pt_struct.pt_gr[regno] = read_register (regno); */ -/* OBSOLETE for (regno = LR0_REGNUM; regno < LR0_REGNUM + 128; regno++) */ -/* OBSOLETE pt_struct.pt_gr[regno] = read_register (regno); */ -/* OBSOLETE errno = 0; */ -/* OBSOLETE ptrace (PT_WRITE_STRUCT, PIDGET (inferior_ptid), */ -/* OBSOLETE (PTRACE_ARG3_TYPE) register_addr (GR1_REGNUM, 0), */ -/* OBSOLETE (int) &pt_struct.pt_gr1, (1 * 32 * 128) * 4); */ -/* OBSOLETE if (errno != 0) */ -/* OBSOLETE { */ -/* OBSOLETE sprintf (buf, "writing all local/global registers"); */ -/* OBSOLETE perror_with_name (buf); */ -/* OBSOLETE } */ -/* OBSOLETE pt_struct.pt_psr = read_register (CPS_REGNUM); */ -/* OBSOLETE pt_struct.pt_pc0 = read_register (NPC_REGNUM); */ -/* OBSOLETE pt_struct.pt_pc1 = read_register (PC_REGNUM); */ -/* OBSOLETE pt_struct.pt_pc2 = read_register (PC2_REGNUM); */ -/* OBSOLETE pt_struct.pt_ipc = read_register (IPC_REGNUM); */ -/* OBSOLETE pt_struct.pt_ipa = read_register (IPA_REGNUM); */ -/* OBSOLETE pt_struct.pt_ipb = read_register (IPB_REGNUM); */ -/* OBSOLETE pt_struct.pt_q = read_register (Q_REGNUM); */ -/* OBSOLETE pt_struct.pt_bp = read_register (BP_REGNUM); */ -/* OBSOLETE pt_struct.pt_fc = read_register (FC_REGNUM); */ -/* OBSOLETE errno = 0; */ -/* OBSOLETE ptrace (PT_WRITE_STRUCT, PIDGET (inferior_ptid), */ -/* OBSOLETE (PTRACE_ARG3_TYPE) register_addr (CPS_REGNUM, 0), */ -/* OBSOLETE (int) &pt_struct.pt_psr, (10) * 4); */ -/* OBSOLETE if (errno != 0) */ -/* OBSOLETE { */ -/* OBSOLETE sprintf (buf, "writing all special registers"); */ -/* OBSOLETE perror_with_name (buf); */ -/* OBSOLETE return; */ -/* OBSOLETE } */ -/* OBSOLETE #else */ -/* OBSOLETE store_inferior_registers (GR1_REGNUM); */ -/* OBSOLETE for (regno = GR96_REGNUM; regno < GR96_REGNUM + 32; regno++) */ -/* OBSOLETE store_inferior_registers (regno); */ -/* OBSOLETE for (regno = LR0_REGNUM; regno < LR0_REGNUM + 128; regno++) */ -/* OBSOLETE store_inferior_registers (regno); */ -/* OBSOLETE store_inferior_registers (CPS_REGNUM); */ -/* OBSOLETE store_inferior_registers (PC_REGNUM); */ -/* OBSOLETE store_inferior_registers (NPC_REGNUM); */ -/* OBSOLETE store_inferior_registers (PC2_REGNUM); */ -/* OBSOLETE store_inferior_registers (IPC_REGNUM); */ -/* OBSOLETE store_inferior_registers (IPA_REGNUM); */ -/* OBSOLETE store_inferior_registers (IPB_REGNUM); */ -/* OBSOLETE store_inferior_registers (Q_REGNUM); */ -/* OBSOLETE store_inferior_registers (BP_REGNUM); */ -/* OBSOLETE store_inferior_registers (FC_REGNUM); */ -/* OBSOLETE #endif /* ULTRA3 */ */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* */ -/* OBSOLETE * Fetch an individual register (and supply it). */ -/* OBSOLETE * return 0 on success, -1 on failure. */ -/* OBSOLETE * NOTE: Assumes AMD's Binary Compatibility Standard for ptrace(). */ -/* OBSOLETE */ */ -/* OBSOLETE static void */ -/* OBSOLETE fetch_register (int regno) */ -/* OBSOLETE { */ -/* OBSOLETE char buf[128]; */ -/* OBSOLETE int val; */ -/* OBSOLETE */ -/* OBSOLETE if (CANNOT_FETCH_REGISTER (regno)) */ -/* OBSOLETE { */ -/* OBSOLETE val = -1; */ -/* OBSOLETE supply_register (regno, &val); */ -/* OBSOLETE } */ -/* OBSOLETE else */ -/* OBSOLETE { */ -/* OBSOLETE errno = 0; */ -/* OBSOLETE val = ptrace (PT_READ_U, PIDGET (inferior_ptid), */ -/* OBSOLETE (PTRACE_ARG3_TYPE) register_addr (regno, 0), 0); */ -/* OBSOLETE if (errno != 0) */ -/* OBSOLETE { */ -/* OBSOLETE sprintf (buf, "reading register %s (#%d)", REGISTER_NAME (regno), regno); */ -/* OBSOLETE perror_with_name (buf); */ -/* OBSOLETE } */ -/* OBSOLETE else */ -/* OBSOLETE { */ -/* OBSOLETE supply_register (regno, &val); */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE */ -/* OBSOLETE /* */ -/* OBSOLETE * Read AMD's Binary Compatibilty Standard conforming core file. */ -/* OBSOLETE * struct ptrace_user is the first thing in the core file */ -/* OBSOLETE * */ -/* OBSOLETE * CORE_REG_SECT, CORE_REG_SIZE, WHICH, and REG_ADDR are all ignored. */ -/* OBSOLETE */ */ -/* OBSOLETE */ -/* OBSOLETE static void */ -/* OBSOLETE fetch_core_registers (char *core_reg_sect, unsigned core_reg_size, */ -/* OBSOLETE int which, CORE_ADDR reg_addr) */ -/* OBSOLETE { */ -/* OBSOLETE register int regno; */ -/* OBSOLETE int val; */ -/* OBSOLETE char buf[4]; */ -/* OBSOLETE */ -/* OBSOLETE for (regno = 0; regno < NUM_REGS; regno++) */ -/* OBSOLETE { */ -/* OBSOLETE if (!CANNOT_FETCH_REGISTER (regno)) */ -/* OBSOLETE { */ -/* OBSOLETE val = bfd_seek (core_bfd, (file_ptr) register_addr (regno, 0), SEEK_SET); */ -/* OBSOLETE if (val != 0 || (val = bfd_bread (buf, sizeof buf, core_bfd)) != sizeof buf) */ -/* OBSOLETE { */ -/* OBSOLETE char *buffer = (char *) alloca (strlen (REGISTER_NAME (regno)) + 35); */ -/* OBSOLETE strcpy (buffer, "Reading core register "); */ -/* OBSOLETE strcat (buffer, REGISTER_NAME (regno)); */ -/* OBSOLETE perror_with_name (buffer); */ -/* OBSOLETE } */ -/* OBSOLETE supply_register (regno, buf); */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* Fake any registers that are in REGISTER_NAMES, but not available to gdb */ */ -/* OBSOLETE registers_fetched (); */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE */ -/* OBSOLETE /* */ -/* OBSOLETE * Takes a register number as defined in tm.h via REGISTER_NAMES, and maps */ -/* OBSOLETE * it to an offset in a struct ptrace_user defined by AMD's BCS. */ -/* OBSOLETE * That is, it defines the mapping between gdb register numbers and items in */ -/* OBSOLETE * a struct ptrace_user. */ -/* OBSOLETE * A register protection scheme is set up here. If a register not */ -/* OBSOLETE * available to the user is specified in 'regno', then an address that */ -/* OBSOLETE * will cause ptrace() to fail is returned. */ -/* OBSOLETE */ */ -/* OBSOLETE CORE_ADDR */ -/* OBSOLETE register_addr (int regno, CORE_ADDR blockend) */ -/* OBSOLETE { */ -/* OBSOLETE if ((regno >= LR0_REGNUM) && (regno < LR0_REGNUM + 128)) */ -/* OBSOLETE { */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_lr[regno - LR0_REGNUM])); */ -/* OBSOLETE } */ -/* OBSOLETE else if ((regno >= GR96_REGNUM) && (regno < GR96_REGNUM + 32)) */ -/* OBSOLETE { */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_gr[regno - GR96_REGNUM])); */ -/* OBSOLETE } */ -/* OBSOLETE else */ -/* OBSOLETE { */ -/* OBSOLETE switch (regno) */ -/* OBSOLETE { */ -/* OBSOLETE case GR1_REGNUM: */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_gr1)); */ -/* OBSOLETE case CPS_REGNUM: */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_psr)); */ -/* OBSOLETE case NPC_REGNUM: */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_pc0)); */ -/* OBSOLETE case PC_REGNUM: */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_pc1)); */ -/* OBSOLETE case PC2_REGNUM: */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_pc2)); */ -/* OBSOLETE case IPC_REGNUM: */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_ipc)); */ -/* OBSOLETE case IPA_REGNUM: */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_ipa)); */ -/* OBSOLETE case IPB_REGNUM: */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_ipb)); */ -/* OBSOLETE case Q_REGNUM: */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_q)); */ -/* OBSOLETE case BP_REGNUM: */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_bp)); */ -/* OBSOLETE case FC_REGNUM: */ -/* OBSOLETE return (offsetof (struct ptrace_user, pt_fc)); */ -/* OBSOLETE default: */ -/* OBSOLETE fprintf_filtered (gdb_stderr, "register_addr():Bad register %s (%d)\n", */ -/* OBSOLETE REGISTER_NAME (regno), regno); */ -/* OBSOLETE return (0xffffffff); /* Should make ptrace() fail */ */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE */ -/* OBSOLETE /* Register that we are able to handle ultra3 core file formats. */ -/* OBSOLETE FIXME: is this really bfd_target_unknown_flavour? */ */ -/* OBSOLETE */ -/* OBSOLETE static struct core_fns ultra3_core_fns = */ -/* OBSOLETE { */ -/* OBSOLETE bfd_target_unknown_flavour, /* core_flavour */ */ -/* OBSOLETE default_check_format, /* check_format */ */ -/* OBSOLETE default_core_sniffer, /* core_sniffer */ */ -/* OBSOLETE fetch_core_registers, /* core_read_registers */ */ -/* OBSOLETE NULL /* next */ */ -/* OBSOLETE }; */ -/* OBSOLETE */ -/* OBSOLETE void */ -/* OBSOLETE _initialize_core_ultra3 (void) */ -/* OBSOLETE { */ -/* OBSOLETE add_core_fns (&ultra3_core_fns); */ -/* OBSOLETE } */ diff --git a/gdb/ultra3-xdep.c b/gdb/ultra3-xdep.c deleted file mode 100644 index ea87fd6fab2..00000000000 --- a/gdb/ultra3-xdep.c +++ /dev/null @@ -1,138 +0,0 @@ -/* OBSOLETE /* Host-dependent code for GDB, for NYU Ultra3 running Sym1 OS. */ -/* OBSOLETE Copyright 1988, 1989, 1991, 1992, 1993, 1995, 2000 */ -/* OBSOLETE Free Software Foundation, Inc. */ -/* OBSOLETE Contributed by David Wood (wood@nyu.edu) at New York University. */ -/* OBSOLETE */ -/* OBSOLETE This file is part of GDB. */ -/* OBSOLETE */ -/* OBSOLETE This program is free software; you can redistribute it and/or modify */ -/* OBSOLETE it under the terms of the GNU General Public License as published by */ -/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ -/* OBSOLETE (at your option) any later version. */ -/* OBSOLETE */ -/* OBSOLETE This program is distributed in the hope that it will be useful, */ -/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ -/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ -/* OBSOLETE GNU General Public License for more details. */ -/* OBSOLETE */ -/* OBSOLETE You should have received a copy of the GNU General Public License */ -/* OBSOLETE along with this program; if not, write to the Free Software */ -/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ -/* OBSOLETE Boston, MA 02111-1307, USA. */ */ -/* OBSOLETE */ -/* OBSOLETE #define DEBUG */ -/* OBSOLETE #include "defs.h" */ -/* OBSOLETE #include "frame.h" */ -/* OBSOLETE #include "inferior.h" */ -/* OBSOLETE #include "symtab.h" */ -/* OBSOLETE #include "value.h" */ -/* OBSOLETE */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE */ -/* OBSOLETE #include "gdbcore.h" */ -/* OBSOLETE */ -/* OBSOLETE #include */ -/* OBSOLETE #include "gdb_stat.h" */ -/* OBSOLETE */ -/* OBSOLETE /* Assorted operating system circumventions */ */ -/* OBSOLETE */ -/* OBSOLETE #ifdef SYM1 */ -/* OBSOLETE */ -/* OBSOLETE /* FIXME: Kludge this for now. It really should be system call. */ */ -/* OBSOLETE int */ -/* OBSOLETE getpagesize (void) */ -/* OBSOLETE { */ -/* OBSOLETE return (8192); */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE /* FIXME: Fake out the fcntl() call, which we don't have. */ */ -/* OBSOLETE fcntl (int fd, int cmd, int arg) */ -/* OBSOLETE { */ -/* OBSOLETE */ -/* OBSOLETE switch (cmd) */ -/* OBSOLETE { */ -/* OBSOLETE case F_GETFL: */ -/* OBSOLETE return (O_RDONLY); */ -/* OBSOLETE break; */ -/* OBSOLETE default: */ -/* OBSOLETE printf_unfiltered ("Ultra3's fcntl() failing, cmd = %d.\n", cmd); */ -/* OBSOLETE return (-1); */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE */ -/* OBSOLETE /* */ -/* OBSOLETE * 4.2 Signal support, requires linking with libjobs. */ -/* OBSOLETE */ */ -/* OBSOLETE static int _SigMask; */ -/* OBSOLETE #define sigbit(s) (1L << ((s)-1)) */ -/* OBSOLETE */ -/* OBSOLETE init_SigMask (void) */ -/* OBSOLETE { */ -/* OBSOLETE /* Taken from the sym1 kernel in machdep.c:startup() */ */ -/* OBSOLETE _SigMask = sigbit (SIGTSTP) | sigbit (SIGTTOU) | sigbit (SIGTTIN) | */ -/* OBSOLETE sigbit (SIGCHLD) | sigbit (SIGTINT); */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE sigmask (int signo) */ -/* OBSOLETE { */ -/* OBSOLETE return (1 << (signo - 1)); */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE sigsetmask (unsigned int sigmask) */ -/* OBSOLETE { */ -/* OBSOLETE int i, mask = 1; */ -/* OBSOLETE int lastmask = _SigMask; */ -/* OBSOLETE */ -/* OBSOLETE for (i = 0; i < NSIG; i++) */ -/* OBSOLETE { */ -/* OBSOLETE if (sigmask & mask) */ -/* OBSOLETE { */ -/* OBSOLETE if (!(_SigMask & mask)) */ -/* OBSOLETE { */ -/* OBSOLETE sighold (i + 1); */ -/* OBSOLETE _SigMask |= mask; */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE else if (_SigMask & mask) */ -/* OBSOLETE { */ -/* OBSOLETE sigrelse (i + 1); */ -/* OBSOLETE _SigMask &= ~mask; */ -/* OBSOLETE } */ -/* OBSOLETE mask <<= 1; */ -/* OBSOLETE } */ -/* OBSOLETE return (lastmask); */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE sigblock (unsigned int sigmask) */ -/* OBSOLETE { */ -/* OBSOLETE int i, mask = 1; */ -/* OBSOLETE int lastmask = _SigMask; */ -/* OBSOLETE */ -/* OBSOLETE for (i = 0; i < NSIG; i++) */ -/* OBSOLETE { */ -/* OBSOLETE if ((sigmask & mask) && !(_SigMask & mask)) */ -/* OBSOLETE { */ -/* OBSOLETE sighold (i + 1); */ -/* OBSOLETE _SigMask |= mask; */ -/* OBSOLETE } */ -/* OBSOLETE mask <<= 1; */ -/* OBSOLETE } */ -/* OBSOLETE return (lastmask); */ -/* OBSOLETE } */ -/* OBSOLETE #endif /* SYM1 */ */ -/* OBSOLETE */ -/* OBSOLETE */ -/* OBSOLETE /* Initialization code for this module. */ */ -/* OBSOLETE */ -/* OBSOLETE void */ -/* OBSOLETE _initialize_ultra3 (void) */ -/* OBSOLETE { */ -/* OBSOLETE #ifdef SYM1 */ -/* OBSOLETE init_SigMask (); */ -/* OBSOLETE #endif */ -/* OBSOLETE } */ diff --git a/gdb/umax-xdep.c b/gdb/umax-xdep.c deleted file mode 100644 index 608ccd9bbee..00000000000 --- a/gdb/umax-xdep.c +++ /dev/null @@ -1,133 +0,0 @@ -/* OBSOLETE /* umax host stuff. */ -/* OBSOLETE Copyright 1986, 1987, 1989, 1991, 1992, 1993, 1995, 1999, 2000, 2001 */ -/* OBSOLETE Free Software Foundation, Inc. */ -/* OBSOLETE */ -/* OBSOLETE This file is part of GDB. */ -/* OBSOLETE */ -/* OBSOLETE This program is free software; you can redistribute it and/or modify */ -/* OBSOLETE it under the terms of the GNU General Public License as published by */ -/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ -/* OBSOLETE (at your option) any later version. */ -/* OBSOLETE */ -/* OBSOLETE This program is distributed in the hope that it will be useful, */ -/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ -/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ -/* OBSOLETE GNU General Public License for more details. */ -/* OBSOLETE */ -/* OBSOLETE You should have received a copy of the GNU General Public License */ -/* OBSOLETE along with this program; if not, write to the Free Software */ -/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ -/* OBSOLETE Boston, MA 02111-1307, USA. */ */ -/* OBSOLETE */ -/* OBSOLETE #include "defs.h" */ -/* OBSOLETE #include "frame.h" */ -/* OBSOLETE #include "inferior.h" */ -/* OBSOLETE #include "regcache.h" */ -/* OBSOLETE */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE #include */ -/* OBSOLETE */ -/* OBSOLETE #include "gdbcore.h" */ -/* OBSOLETE #include */ -/* OBSOLETE #define PTRACE_ATTACH PT_ATTACH */ -/* OBSOLETE #define PTRACE_DETACH PT_FREEPROC */ -/* OBSOLETE */ -/* OBSOLETE #include */ -/* OBSOLETE #include "gdb_stat.h" */ -/* OBSOLETE */ -/* OBSOLETE /* Work with core dump and executable files, for GDB. */ -/* OBSOLETE This code would be in corefile.c if it weren't machine-dependent. */ */ -/* OBSOLETE */ -/* OBSOLETE void */ -/* OBSOLETE core_file_command (char *filename, int from_tty) */ -/* OBSOLETE { */ -/* OBSOLETE int val; */ -/* OBSOLETE */ -/* OBSOLETE /* Discard all vestiges of any previous core file */ -/* OBSOLETE and mark data and stack spaces as empty. */ */ -/* OBSOLETE */ -/* OBSOLETE if (corefile) */ -/* OBSOLETE xfree (corefile); */ -/* OBSOLETE corefile = 0; */ -/* OBSOLETE */ -/* OBSOLETE if (corechan >= 0) */ -/* OBSOLETE close (corechan); */ -/* OBSOLETE corechan = -1; */ -/* OBSOLETE */ -/* OBSOLETE data_start = 0; */ -/* OBSOLETE data_end = 0; */ -/* OBSOLETE stack_start = STACK_END_ADDR; */ -/* OBSOLETE stack_end = STACK_END_ADDR; */ -/* OBSOLETE */ -/* OBSOLETE /* Now, if a new core file was specified, open it and digest it. */ */ -/* OBSOLETE */ -/* OBSOLETE if (filename) */ -/* OBSOLETE { */ -/* OBSOLETE filename = tilde_expand (filename); */ -/* OBSOLETE make_cleanup (xfree, filename); */ -/* OBSOLETE */ -/* OBSOLETE if (have_inferior_p ()) */ -/* OBSOLETE error ("To look at a core file, you must kill the program with \"kill\"."); */ -/* OBSOLETE corechan = open (filename, O_RDONLY, 0); */ -/* OBSOLETE if (corechan < 0) */ -/* OBSOLETE perror_with_name (filename); */ -/* OBSOLETE /* 4.2-style (and perhaps also sysV-style) core dump file. */ */ -/* OBSOLETE { */ -/* OBSOLETE struct ptrace_user u; */ -/* OBSOLETE int reg_offset; */ -/* OBSOLETE */ -/* OBSOLETE val = myread (corechan, &u, sizeof u); */ -/* OBSOLETE if (val < 0) */ -/* OBSOLETE perror_with_name (filename); */ -/* OBSOLETE data_start = exec_data_start; */ -/* OBSOLETE */ -/* OBSOLETE data_end = data_start + u.pt_dsize; */ -/* OBSOLETE stack_start = stack_end - u.pt_ssize; */ -/* OBSOLETE data_offset = sizeof u; */ -/* OBSOLETE stack_offset = data_offset + u.pt_dsize; */ -/* OBSOLETE reg_offset = 0; */ -/* OBSOLETE */ -/* OBSOLETE memcpy (&core_aouthdr, &u.pt_aouthdr, sizeof (AOUTHDR)); */ -/* OBSOLETE printf_unfiltered ("Core file is from \"%s\".\n", u.pt_comm); */ -/* OBSOLETE if (u.pt_signal > 0) */ -/* OBSOLETE printf_unfiltered ("Program terminated with signal %d, %s.\n", */ -/* OBSOLETE u.pt_signal, safe_strsignal (u.pt_signal)); */ -/* OBSOLETE */ -/* OBSOLETE /* Read the register values out of the core file and store */ -/* OBSOLETE them where `read_register' will find them. */ */ -/* OBSOLETE */ -/* OBSOLETE { */ -/* OBSOLETE register int regno; */ -/* OBSOLETE */ -/* OBSOLETE for (regno = 0; regno < NUM_REGS; regno++) */ -/* OBSOLETE { */ -/* OBSOLETE char buf[MAX_REGISTER_RAW_SIZE]; */ -/* OBSOLETE */ -/* OBSOLETE val = lseek (corechan, register_addr (regno, reg_offset), 0); */ -/* OBSOLETE if (val < 0) */ -/* OBSOLETE perror_with_name (filename); */ -/* OBSOLETE */ -/* OBSOLETE val = myread (corechan, buf, sizeof buf); */ -/* OBSOLETE if (val < 0) */ -/* OBSOLETE perror_with_name (filename); */ -/* OBSOLETE supply_register (regno, buf); */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE } */ -/* OBSOLETE if (filename[0] == '/') */ -/* OBSOLETE corefile = savestring (filename, strlen (filename)); */ -/* OBSOLETE else */ -/* OBSOLETE { */ -/* OBSOLETE corefile = concat (current_directory, "/", filename, NULL); */ -/* OBSOLETE } */ -/* OBSOLETE */ -/* OBSOLETE flush_cached_frames (); */ -/* OBSOLETE select_frame (get_current_frame (), 0); */ -/* OBSOLETE validate_files (); */ -/* OBSOLETE } */ -/* OBSOLETE else if (from_tty) */ -/* OBSOLETE printf_unfiltered ("No core file now.\n"); */ -/* OBSOLETE } */ -- 2.30.2