This is the mail archive of the
binutils@sourceware.org
mailing list for the binutils project.
[patch]: vms-alpha: properly round linkage_index
- From: Tristan Gingold <gingold at adacore dot com>
- To: binutils Development <binutils at sourceware dot org>
- Date: Thu, 4 Aug 2011 10:13:36 +0200
- Subject: [patch]: vms-alpha: properly round linkage_index
Hi,
as the linkage_index was not properly rounded, VMS linker emits an error message in some cases.
Fixed by this patch, committed on trunk.
Tristan.
bfd/
2011-08-04 Tristan Gingold <gingold@adacore.com>
* vms-alpha.c (_bfd_vms_write_eeom): Round vms_linkage_index.
(_bfd_vms_write_etir): Initialize vms_linkage_index to 0.
RCS file: /cvs/src/src/bfd/vms-alpha.c,v
retrieving revision 1.51
diff -c -r1.51 vms-alpha.c
*** vms-alpha.c 11 Jul 2011 15:03:07 -0000 1.51
--- vms-alpha.c 4 Aug 2011 08:13:16 -0000
***************
*** 2660,2666 ****
_bfd_vms_output_alignment (recwr, 2);
_bfd_vms_output_begin (recwr, EOBJ__C_EEOM);
! _bfd_vms_output_long (recwr, (unsigned long) (PRIV (vms_linkage_index) >> 1));
_bfd_vms_output_byte (recwr, 0); /* Completion code. */
_bfd_vms_output_byte (recwr, 0); /* Fill byte. */
--- 2660,2666 ----
_bfd_vms_output_begin (recwr, EOBJ__C_EEOM);
! _bfd_vms_output_long (recwr, PRIV (vms_linkage_index + 1) >> 1);
_bfd_vms_output_byte (recwr, 0); /* Completion code. */
_bfd_vms_output_byte (recwr, 0); /* Fill byte. */
***************
*** 3736,3742 ****
_bfd_vms_output_alignment (recwr, 4);
! PRIV (vms_linkage_index) = 1;
for (section = abfd->sections; section; section = section->next)
{
--- 3736,3742 ----
_bfd_vms_output_alignment (recwr, 4);
! PRIV (vms_linkage_index) = 0;
for (section = abfd->sections; section; section = section->next)
{