Re: bfd_cleanup for object_p

[deliverable/binutils-gdb.git] / bfd / ptrace-core.c

diff --git a/bfd/ptrace-core.c b/bfd/ptrace-core.c
index 48a9b1c669e9a02c4fc0cf9f673c0c8e75ee5603..e9802f8ea062b07a9d7385c15a98e26a386f5747 100644 (file)
--- a/bfd/ptrace-core.c
+++ b/bfd/ptrace-core.c
@@ -55,7 +55,7 @@ int ptrace_unix_core_file_failing_signal (bfd *abfd);
 #define ptrace_unix_core_file_pid _bfd_nocore_core_file_pid
 static void swap_abort (void);
 
-const bfd_target *
+bfd_cleanup
 ptrace_unix_core_file_p (bfd *abfd)
 {
   int val;
@@ -124,7 +124,7 @@ ptrace_unix_core_file_p (bfd *abfd)
   core_datasec (abfd)->alignment_power = 2;
   core_regsec (abfd)->alignment_power = 2;
 
-  return abfd->xvec;
+  return _bfd_no_cleanup;
 
  fail:
   bfd_release (abfd, abfd->tdata.any);