2010-05-21 Tristan Gingold <gingold@adacore.com>

	* vms-alpha.c (_bfd_vms_slurp_eihs): Do not create a bfd section
	for the GST.

diff --git a/bfd/ChangeLog b/bfd/ChangeLog
index 167e8c6..0372583 100644 (file)
--- a/bfd/ChangeLog
+++ b/bfd/ChangeLog
@@ -1,5 +1,10 @@
 2010-05-21  Tristan Gingold  <gingold@adacore.com>
 
+       * vms-alpha.c (_bfd_vms_slurp_eihs): Do not create a bfd section
+       for the GST.
+
+2010-05-21  Tristan Gingold  <gingold@adacore.com>
+
        * vms-alpha.c (_bfd_vms_slurp_eisd): Set SEC_HAS_CONTENTS and
        SEC_LOAD if isect has data.
        (vms_get_symbol_info): Refine the condition for 'T' type.

diff --git a/bfd/vms-alpha.c b/bfd/vms-alpha.c
index 2c6a19c..f4804b4 100644 (file)
--- a/bfd/vms-alpha.c
+++ b/bfd/vms-alpha.c
@@ -667,12 +667,6 @@ _bfd_vms_slurp_eihs (bfd *abfd, unsigned int offset)
 
   if (gstvbn)
     {
-      flagword bfd_flags = SEC_HAS_CONTENTS;
-
-      section = bfd_make_section (abfd, "$GST$");
-      if (!section)
-       return FALSE;
-
       if (bfd_seek (abfd, VMS_BLOCK_SIZE * (gstvbn - 1), SEEK_SET))
        {
          bfd_set_error (bfd_error_file_truncated);
@@ -682,12 +676,6 @@ _bfd_vms_slurp_eihs (bfd *abfd, unsigned int offset)
       if (_bfd_vms_slurp_object_records (abfd) != TRUE)
        return FALSE;
 
-      section->filepos = VMS_BLOCK_SIZE * (gstvbn - 1);
-      section->size = bfd_tell (abfd) - section->filepos;
-
-      if (!bfd_set_section_flags (abfd, section, bfd_flags))
-       return FALSE;
-
       abfd->flags |= HAS_SYMS;
     }