Thu Jul 25 12:08:09 1996 Martin M. Hunt <hunt@pizza.cygnus.com>

[deliverable/binutils-gdb.git] / gdb / sun386-nat.c

diff --git a/gdb/sun386-nat.c b/gdb/sun386-nat.c
index 63f6752570bbb17849e5dc7ebe0ffafbdcf16169..1abb4bb1df05a8ca1384dfd4a155ea0b315cbd71 100644 (file)
--- a/gdb/sun386-nat.c
+++ b/gdb/sun386-nat.c
@@ -17,9 +17,7 @@ GNU General Public License for more details.
 
 You should have received a copy of the GNU General Public License
 along with this program; if not, write to the Free Software
-Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
-
-#if defined (GDB_TARGET_IS_SUN386)
+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 
 #include "defs.h"
 #include "frame.h"
@@ -37,11 +35,11 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
 #include <machine/reg.h>
 
 #include <sys/file.h>
-#include <sys/stat.h>
+#include "gdb_stat.h"
 #include <sys/core.h>
 
 \f
-/* Machine-dependent code which would otherwise be in core.c */
+/* Machine-dependent code which would otherwise be in corefile.c */
 /* Work with core files, for GDB. */
 
 \f
@@ -130,8 +128,7 @@ core_file_command (filename, from_tty)
          corefile = concat (current_directory, "/", filename, NULL);
        }
 
-      set_current_frame ( create_new_frame (read_register (FP_REGNUM),
-                                           read_pc ()));
+      flush_cached_frames ();
       select_frame (get_current_frame (), 0);
 
       validate_files ();
@@ -185,21 +182,6 @@ double_to_i387 (from, to)
   asm ("fstpt (%eax)");
   asm ("fwait");
 }
-#else /* Not sun386 target.  */
-
-/* These functions shouldn't be called when we're cross-debugging.  */
-
-/* ARGSUSED */
-void
-fetch_core_registers (core_reg_sect, core_reg_size, which, reg_addr)
-     char *core_reg_sect;
-     unsigned core_reg_size;
-     int which;
-     unsigned int reg_addr;    /* Unused in this version */
-{
-}
-
-#endif /* Not sun386 target.  */
 
 void
 fetch_inferior_registers (regno)
@@ -274,4 +256,3 @@ store_inferior_registers (regno)
   ptrace (PTRACE_SETFPREGS, inferior_pid,
          (PTRACE_ARG3_TYPE) &inferior_fp_registers);
 }
-