From: Nick Clifton <nickc@redhat.com>
Date: Mon, 7 Jan 2008 17:53:03 +0000 (+0000)
Subject: PR binutils/5535
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=780b23606d1373bf8d28535bbf6b3f87af863bde;p=binutils-gdb.git

PR binutils/5535
   * vms.c (vms_close_and_cleanup): Check for the presence of a
   vms_private_data_struct before examining any of its fields.
---

diff --git a/bfd/ChangeLog b/bfd/ChangeLog
index ef3fc9f730f..09cd0e48824 100644
--- a/bfd/ChangeLog
+++ b/bfd/ChangeLog
@@ -1,3 +1,9 @@
+2008-01-07  Nick Clifton  <nickc@redhat.com>
+
+	PR binutils/5535
+	* vms.c (vms_close_and_cleanup): Check for the presence of a
+	vms_private_data_struct before examining any of its fields.
+
 2008-01-07  H.J. Lu  <hongjiu.lu@intel.com>
 
 	PR ld/5522
diff --git a/bfd/vms.c b/bfd/vms.c
index 457aea86d02..bb5ab118c72 100644
--- a/bfd/vms.c
+++ b/bfd/vms.c
@@ -428,7 +428,8 @@ vms_close_and_cleanup (bfd * abfd)
 #if VMS_DEBUG
   vms_debug (1, "vms_close_and_cleanup (%p)\n", abfd);
 #endif
-  if (abfd == NULL)
+  if (abfd == NULL
+      || abfd->tdata.any == NULL)
     return TRUE;
 
   if (PRIV (vms_buf) != NULL)