Break the direct connection from core_file_command to any

particular type of core file support.

* target.h (find_core_target): new prototype.
* target.c (find_core_target): new function.  Walks the target
  list looking for the core target.
* core.c (core_file_command): replace calls to core_detach and
  core_open with find_core_target and direct calls.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index fd1f3f98f8450281f4885dd72696876ee723981b..651382692de650614f5ba0bc33b1d26734361d85 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,14 @@
+Tue Sep 29 14:35:00 1992  K. Richard Pixley  (rich@sendai.cygnus.com)
+
+       Break the direct connection from core_file_command to any
+       particular type of core file support.
+
+       * target.h (find_core_target): new prototype.
+       * target.c (find_core_target): new function.  Walks the target
+         list looking for the core target.
+       * core.c (core_file_command): replace calls to core_detach and
+         core_open with find_core_target and direct calls.
+
 Tue Sep 29 10:19:00 1992  Ian Lance Taylor  (ian@cygnus.com)
 
        * xm-hp300hpux.h: define MEM_FNS_DECLARED; include <sys/ptrace.h>

diff --git a/gdb/core.c b/gdb/core.c
index 6248c174e4277422c3b0f756cae702dc61b727ac..2b45c1c66f4237abd4318bb20b8788ea9288d4f5 100644 (file)
--- a/gdb/core.c
+++ b/gdb/core.c
@@ -47,12 +47,17 @@ core_file_command (filename, from_tty)
      char *filename;
      int from_tty;
 {
+  struct target_ops *t;
   dont_repeat ();                      /* Either way, seems bogus. */
 
-  if (!filename)
-    core_detach (filename, from_tty);
+  t = find_core_target ();
+  if (t != NULL)
+    if (!filename)
+      (t->to_detach) (filename, from_tty);
+    else
+      (t->to_open) (filename, from_tty);
   else
-    core_open (filename, from_tty);
+    error ("unimplemented: core files");
 }
 
 \f