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

	* vms-lib.c (_bfd_vms_lib_write_archive_contents): Fix idd flags.

diff --git a/bfd/ChangeLog b/bfd/ChangeLog
index 95f411e0f27fe5c8a02f9246db3e59d847482958..6d425d1388a0f72185478c34611c6b402c5204d1 100644 (file)
--- a/bfd/ChangeLog
+++ b/bfd/ChangeLog
@@ -1,3 +1,7 @@
+2010-04-06  Tristan Gingold  <gingold@adacore.com>
+
+       * vms-lib.c (_bfd_vms_lib_write_archive_contents): Fix idd flags.
+
 2010-04-05  Jakub Jelinek  <jakub@redhat.com>
 
        * elf-eh-frame.c (_bfd_elf_parse_eh_frame): Handle CIE version 4

diff --git a/bfd/vms-lib.c b/bfd/vms-lib.c
index cdef1f5b418ab32938467385ae20ce285f4d85d9..4f7da81d7924fb8877a939216451c298541adf48 100644 (file)
--- a/bfd/vms-lib.c
+++ b/bfd/vms-lib.c
@@ -1608,6 +1608,7 @@ _bfd_vms_lib_write_archive_contents (bfd *arch)
     unsigned char blk[VMS_BLOCK_SIZE];
     struct vms_lhd *lhd = (struct vms_lhd *)blk;
     struct vms_idd *idd = (struct vms_idd *)(blk + sizeof (*lhd));
+    unsigned int idd_flags;
 
     memset (blk, 0, sizeof (blk));
 
@@ -1638,13 +1639,15 @@ _bfd_vms_lib_write_archive_contents (bfd *arch)
     bfd_putl32 (vbn - 1, lhd->hiprusd);
 
     /* First index (modules name).  */
-    bfd_putl16 (IDD__FLAGS_ASCII | IDD__FLAGS_VARLENIDX, idd->flags);
+    idd_flags = IDD__FLAGS_ASCII | IDD__FLAGS_VARLENIDX
+      | IDD__FLAGS_NOCASECMP | IDD__FLAGS_NOCASENTR;
+    bfd_putl16 (idd_flags, idd->flags);
     bfd_putl16 (MAX_KEYLEN, idd->keylen);
     bfd_putl16 (mod_idx_vbn, idd->vbn);
     idd++;
 
     /* Second index (symbols name).  */
-    bfd_putl16 (IDD__FLAGS_ASCII | IDD__FLAGS_VARLENIDX, idd->flags);
+    bfd_putl16 (idd_flags, idd->flags);
     bfd_putl16 (MAX_KEYLEN, idd->keylen);
     bfd_putl16 (sym_idx_vbn, idd->vbn);
     idd++;