diff --git a/bfd/ChangeLog b/bfd/ChangeLog
index d1c302525f..8e3b59b187 100644
--- a/bfd/ChangeLog
+++ b/bfd/ChangeLog
@@ -1,5 +1,7 @@
 2001-11-19  Alan Modra  <amodra@bigpond.net.au>
 
+	* elf32-hppa.c (clobber_millicode_symbols): Dec dynstr refcount.
+
 	* elf32-hppa.c (elf32_hppa_size_stubs): Don't consider undefined
 	millicode syms as candidates for import stubs.
 
diff --git a/bfd/elf32-hppa.c b/bfd/elf32-hppa.c
index cf67af4487..481bde7e5d 100644
--- a/bfd/elf32-hppa.c
+++ b/bfd/elf32-hppa.c
@@ -2225,9 +2225,13 @@ clobber_millicode_symbols (h, info)
      Therefore we do not leave ELF_LINK_FORCED_LOCAL set.  */
   if (h->type == STT_PARISC_MILLI)
     {
+      struct elf32_hppa_link_hash_table *htab;
       unsigned short oldflags = h->elf_link_hash_flags;
+
       h->elf_link_hash_flags |= ELF_LINK_FORCED_LOCAL;
       elf32_hppa_hide_symbol (info, h);
+      htab = hppa_link_hash_table (info);
+      _bfd_elf_strtab_delref (htab->elf.dynstr, h->dynstr_index);
       h->elf_link_hash_flags &= ~ELF_LINK_FORCED_LOCAL;
       h->elf_link_hash_flags |= oldflags & ELF_LINK_FORCED_LOCAL;
     }