2010-11-04 Tristan Gingold <gingold@adacore.com>

* vms-lib.c (vms_write_index): Fix thinko: reverse the loop.
	Use bfd_zmalloc instead of bfd_malloc.  Fix comment.
This commit is contained in:
Tristan Gingold 2010-11-04 16:17:44 +00:00
parent 802d48223b
commit dd7f9124e9
2 changed files with 10 additions and 4 deletions

View File

@ -1,3 +1,8 @@
2010-11-04 Tristan Gingold <gingold@adacore.com>
* vms-lib.c (vms_write_index): Fix thinko: reverse the loop.
Use bfd_zmalloc instead of bfd_malloc. Fix comment.
2010-11-04 Kai Tietz <kai.tietz@onevision.com>
* coffcode.h (GNU_LINKONCE_WT): New.

View File

@ -1591,7 +1591,7 @@ vms_write_index (bfd *abfd,
/* Allocate first index block. */
level = 1;
if (abfd != NULL)
rblk[0] = bfd_malloc (sizeof (struct vms_indexdef));
rblk[0] = bfd_zmalloc (sizeof (struct vms_indexdef));
blk[0].vbn = (*vbn)++;
blk[0].len = 0;
blk[0].lastlen = 0;
@ -1698,7 +1698,7 @@ vms_write_index (bfd *abfd,
/* Need to create a parent. */
if (abfd != NULL)
{
rblk[level] = bfd_malloc (sizeof (struct vms_indexdef));
rblk[level] = bfd_zmalloc (sizeof (struct vms_indexdef));
bfd_putl32 (*vbn, rblk[j]->parent);
}
blk[level].vbn = (*vbn)++;
@ -1717,7 +1717,8 @@ vms_write_index (bfd *abfd,
memcpy (rblk[j + 1]->keys + blk[j + 1].len,
rblk[j]->keys + blk[j].len,
blk[j].lastlen);
/* Fix the entry (which in always the first field of an entry. */
/* Fix the entry (which in always the first field of an
entry. */
rfa = (struct vms_rfa *)(rblk[j + 1]->keys + blk[j + 1].len);
bfd_putl32 (blk[j].vbn, rfa->vbn);
bfd_putl16 (RFADEF__C_INDEX, rfa->offset);
@ -1806,7 +1807,7 @@ vms_write_index (bfd *abfd,
return TRUE;
/* Flush. */
for (j = 0; j < level; j++)
for (j = level - 1; j >= 0; j--)
{
if (j > 0)
{