2010-06-08 Tristan Gingold <gingold@adacore.com>
* vms-lib.c (_bfd_vms_lib_write_archive_contents): Increment for the first block.
This commit is contained in:
parent
2bf1d2a446
commit
cba3addf0c
|
@ -1,3 +1,8 @@
|
||||||
|
2010-06-08 Tristan Gingold <gingold@adacore.com>
|
||||||
|
|
||||||
|
* vms-lib.c (_bfd_vms_lib_write_archive_contents): Increment
|
||||||
|
for the first block.
|
||||||
|
|
||||||
2010-06-08 Tristan Gingold <gingold@adacore.com>
|
2010-06-08 Tristan Gingold <gingold@adacore.com>
|
||||||
|
|
||||||
* vms-lib.c (_bfd_vms_lib_ia64_mkarchive): New function.
|
* vms-lib.c (_bfd_vms_lib_ia64_mkarchive): New function.
|
||||||
|
|
|
@ -2111,6 +2111,7 @@ _bfd_vms_lib_write_archive_contents (bfd *arch)
|
||||||
/* Write the first block (which contains an mhd). */
|
/* Write the first block (which contains an mhd). */
|
||||||
if (bfd_bwrite (blk, VMS_BLOCK_SIZE, arch) != VMS_BLOCK_SIZE)
|
if (bfd_bwrite (blk, VMS_BLOCK_SIZE, arch) != VMS_BLOCK_SIZE)
|
||||||
goto input_err;
|
goto input_err;
|
||||||
|
off += VMS_BLOCK_SIZE;
|
||||||
|
|
||||||
if (amt == VMS_BLOCK_SIZE - sz)
|
if (amt == VMS_BLOCK_SIZE - sz)
|
||||||
{
|
{
|
||||||
|
|
Loading…
Reference in New Issue