2010-05-21 Tristan Gingold <gingold@adacore.com>
* vms-alpha.c (_bfd_vms_slurp_eihs): Do not create a bfd section for the GST.
This commit is contained in:
parent
c068d5be63
commit
6a286118b5
|
@ -1,3 +1,8 @@
|
|||
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
|
||||
|
|
|
@ -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;
|
||||
}
|
||||
|
||||
|
|
Loading…
Reference in New Issue