* Many files: Changes to avoid gcc warnings: Remove unused local
authorIan Lance Taylor <ian@airs.com>
Mon, 12 Jul 1999 07:35:20 +0000 (07:35 +0000)
committerIan Lance Taylor <ian@airs.com>
Mon, 12 Jul 1999 07:35:20 +0000 (07:35 +0000)
variables.  Add default case to enum switches.
* coff-arm.c (bfd_arm_allocate_interworking_sections): Only
compile if not COFF_IMAGE_WITH_PE.
(record_arm_to_thumb_glue, record_thumb_to_arm_glue): Likewise.
(bfd_arm_get_bfd_for_interworking): Likewise.
(bfd_arm_process_before_allocation): Likewise.
* epoc-pei-arm.c: Don't rename bfd_arm functions.
* pei-arm.c: Likewise.
* elf32-mips.c (mips_elf_link_hash_table_create): Don't declare.
(MIPS_ELF_ADD_DYNAMIC_ENTRY): Correct last change.
(mips_elf_got16_entry): Put parens around & in body of ==.
(mips_elf_calculate_relocation): Correct test for empty string.
* vms-gsd.c: Use _bfd_error_handler rather than fprintf to
stderr.
* vms-misc.c (_bfd_vms_length_hash_symbol): Correct sprintf
format.

22 files changed:
bfd/ChangeLog
bfd/coff-arm.c
bfd/coff-mcore.c
bfd/elf-m10300.c
bfd/elf32-arm.h
bfd/elf32-d10v.c
bfd/elf32-fr30.c
bfd/elf32-hppa.c
bfd/elf32-m32r.c
bfd/elf32-m68k.c
bfd/elf32-mcore.c
bfd/elf32-mips.c
bfd/elf32-sh.c
bfd/elf32-sparc.c
bfd/elf32-v850.c
bfd/epoc-pei-arm.c
bfd/pei-arm.c
bfd/vms-gsd.c
bfd/vms-hdr.c
bfd/vms-misc.c
bfd/vms-tir.c
bfd/vms.c

index c3b0f7bab74a01a02bf71c5675a1977c1b6b0f06..e6ccff91ac1c45942fd7cea256b63c0435e4a48b 100644 (file)
@@ -1,3 +1,23 @@
+1999-07-12  Ian Lance Taylor  <ian@zembu.com>
+
+       * Many files: Changes to avoid gcc warnings: Remove unused local
+       variables.  Add default case to enum switches.
+       * coff-arm.c (bfd_arm_allocate_interworking_sections): Only
+       compile if not COFF_IMAGE_WITH_PE.
+       (record_arm_to_thumb_glue, record_thumb_to_arm_glue): Likewise.
+       (bfd_arm_get_bfd_for_interworking): Likewise.
+       (bfd_arm_process_before_allocation): Likewise.
+       * epoc-pei-arm.c: Don't rename bfd_arm functions.
+       * pei-arm.c: Likewise.
+       * elf32-mips.c (mips_elf_link_hash_table_create): Don't declare.
+       (MIPS_ELF_ADD_DYNAMIC_ENTRY): Correct last change.
+       (mips_elf_got16_entry): Put parens around & in body of ==.
+       (mips_elf_calculate_relocation): Correct test for empty string.
+       * vms-gsd.c: Use _bfd_error_handler rather than fprintf to
+       stderr.
+       * vms-misc.c (_bfd_vms_length_hash_symbol): Correct sprintf
+       format.
+
 1999-07-11  Ian Lance Taylor  <ian@zembu.com>
 
        * Many files: Changes to avoid gcc warnings: Add ATTRIBUTE_UNUSED
index adc57fdfeb1364aea7c9d8e125a7fb6cef22ef0b..f5ecf9538d6924662922c196879107c39ca9460d 100644 (file)
@@ -89,10 +89,12 @@ static struct coff_link_hash_entry * find_thumb_glue
   PARAMS ((struct bfd_link_info *, CONST char *, bfd *));
 static struct coff_link_hash_entry * find_arm_glue
   PARAMS ((struct bfd_link_info *, CONST char *, bfd *));
+#ifndef COFF_IMAGE_WITH_PE
 static void record_arm_to_thumb_glue
   PARAMS ((struct bfd_link_info *, struct coff_link_hash_entry *));
 static void record_thumb_to_arm_glue
   PARAMS ((struct bfd_link_info *, struct coff_link_hash_entry *));
+#endif
 static boolean coff_arm_merge_private_bfd_data
   PARAMS ((bfd *, bfd *));
 static boolean coff_arm_print_private_bfd_data
@@ -1604,9 +1606,8 @@ coff_arm_relocate_section (output_bfd, info, input_bfd, input_section,
   return true;
 }
 
-#ifdef COFF_IMAGE_WITH_PE
-static
-#endif
+#ifndef COFF_IMAGE_WITH_PE
+
 boolean
 bfd_arm_allocate_interworking_sections (info) 
      struct bfd_link_info * info;
@@ -1793,9 +1794,7 @@ record_thumb_to_arm_glue (info, h)
 /* Select a BFD to be used to hold the sections used by the glue code.
    This function is called from the linker scripts in ld/emultempl/
    {armcoff/pe}.em  */
-#ifdef COFF_IMAGE_WITH_PE
-static
-#endif
+
 boolean
 bfd_arm_get_bfd_for_interworking (abfd, info)
      bfd *                 abfd;
@@ -1851,9 +1850,6 @@ bfd_arm_get_bfd_for_interworking (abfd, info)
   return true;
 }
 
-#ifdef COFF_IMAGE_WITH_PE
-static
-#endif
 boolean
 bfd_arm_process_before_allocation (abfd, info, support_old_code)
      bfd *                   abfd;
@@ -1961,6 +1957,8 @@ bfd_arm_process_before_allocation (abfd, info, support_old_code)
   return true;
 }
 
+#endif /* ! defined (COFF_IMAGE_WITH_PE) */
+
 #define coff_bfd_reloc_type_lookup             coff_arm_reloc_type_lookup
 #define coff_relocate_section                  coff_arm_relocate_section
 #define coff_bfd_is_local_label_name           coff_arm_is_local_label_name
index c0efebfa1e074caf5964417a61a9f967469de64e..340542e58604223fc819faf3486473628553dc60 100644 (file)
@@ -1,6 +1,5 @@
 /* BFD back-end for Motorolla MCore COFF/PE
-   Copyright 1999
-   Free Software Foundation, Inc.
+   Copyright 1999 Free Software Foundation, Inc.
 
 This file is part of BFD, the Binary File Descriptor library.
 
@@ -397,8 +396,6 @@ coff_mcore_relocate_section (output_bfd, info, input_bfd, input_section,
   
   for (; rel < relend; rel++)
     {
-      asection *                     toc_section = NULL;
-      bfd_vma                        relocation;
       long                           symndx;
       struct internal_syment *       sym;
       bfd_vma                        val;
index 9ba09a88d61d8689b1920c25a93b1181613cc535..53092f646406fd108649b682c458e4a8a4f46695 100644 (file)
@@ -1,5 +1,5 @@
 /* Matsushita 10300 specific support for 32-bit ELF
-   Copyright (C) 1996, 1997, 1998 Free Software Foundation, Inc.
+   Copyright (C) 1996, 1997, 1998, 1999 Free Software Foundation, Inc.
 
 This file is part of BFD, the Binary File Descriptor library.
 
@@ -407,6 +407,9 @@ mn10300_elf_gc_mark_hook (abfd, info, rel, h, sym)
 
            case bfd_link_hash_common:
              return h->root.u.c.p->section;
+
+           default:
+             break;
            }
        }
     }
@@ -849,7 +852,6 @@ mn10300_elf_relax_section (abfd, sec, link_info, again)
              asection *sym_sec;
              const char *sym_name;
              char *new_name;
-             Elf_Internal_Shdr *hdr;
 
              /* Get cached copy of section contents if it exists.  */
              if (elf_section_data (section)->this_hdr.contents != NULL)
@@ -1193,7 +1195,6 @@ mn10300_elf_relax_section (abfd, sec, link_info, again)
                  struct elf32_mn10300_link_hash_entry *sym_hash;
                  asection *sym_sec;
                  const char *sym_name;
-                 Elf_Internal_Shdr *hdr;
                  char *new_name;
 
                  bfd_elf32_swap_symbol_in (input_bfd, esym, &isym);
@@ -1461,7 +1462,6 @@ mn10300_elf_relax_section (abfd, sec, link_info, again)
        {
          Elf_Internal_Sym isym;
          asection *sym_sec;
-         Elf_Internal_Shdr *hdr;
          const char *sym_name;
          char *new_name;
 
@@ -2738,10 +2738,6 @@ _bfd_mn10300_elf_final_write_processing (abfd, linker)
      boolean linker;
 {
   unsigned long val;
-  unsigned int i;
-  Elf_Internal_Shdr **hdrpp;
-  const char *name;
-  asection *sec;
 
   switch (bfd_get_mach (abfd))
     {
index ce2eea788f3a02b9427a6f69db9ca280eccb907a..d83ae776c813ccc51cced03a2fe0abc976e5537c 100644 (file)
@@ -625,7 +625,6 @@ bfd_elf32_arm_process_before_allocation (abfd, link_info, no_pipeline_knowledge)
        {
          long r_type;
          unsigned long r_index;
-         unsigned char code;
 
          struct elf_link_hash_entry *h;
 
@@ -1301,7 +1300,6 @@ elf32_arm_final_link_relocate (howto, input_bfd, output_bfd,
        boolean        overflow = false;
        bfd_vma        upper_insn = bfd_get_16 (input_bfd, hit_data);
        bfd_vma        lower_insn = bfd_get_16 (input_bfd, hit_data + 2);
-       bfd_vma        src_mask = 0x007FFFFE;
        bfd_signed_vma reloc_signed_max = (1 << (howto->bitsize - 1)) - 1;
        bfd_signed_vma reloc_signed_min = ~ reloc_signed_max;
        bfd_vma        check;
@@ -2068,6 +2066,9 @@ elf32_arm_gc_mark_hook (abfd, info, rel, h, sym)
 
           case bfd_link_hash_common:
             return h->root.u.c.p->section;
+
+         default:
+           break;
           }
        }
      }
index be80bae2e9b7b041234be162020c252e0e805f1f..07f120ec8920a4775c727d3ab0b00f1ba3691474 100644 (file)
@@ -1,5 +1,5 @@
 /* D10V-specific support for 32-bit ELF
-   Copyright (C) 1996 Free Software Foundation, Inc.
+   Copyright (C) 1996, 1998, 1999 Free Software Foundation, Inc.
    Contributed by Martin Hunt (hunt@cygnus.com).
 
 This file is part of BFD, the Binary File Descriptor library.
@@ -267,6 +267,9 @@ elf32_d10v_gc_mark_hook (abfd, info, rel, h, sym)
 
           case bfd_link_hash_common:
             return h->root.u.c.p->section;
+
+         default:
+           break;
           }
        }
      }
index 7c8725f556228e514860d44e37307e952e1c3000..39bde5f7d1f23f1aaf1b11333718455cea0dc0a3 100644 (file)
@@ -1,5 +1,5 @@
 /* FR30-specific support for 32-bit ELF.
-   Copyright (C) 1998 Free Software Foundation, Inc.
+   Copyright (C) 1998, 1999 Free Software Foundation, Inc.
 
 This file is part of BFD, the Binary File Descriptor library.
 
@@ -703,6 +703,9 @@ fr30_elf_gc_mark_hook (abfd, info, rel, h, sym)
 
            case bfd_link_hash_common:
              return h->root.u.c.p->section;
+
+           default:
+             break;
            }
        }
     }
index c8d20cd9cb4820f70fb836a24fbb0b5026d1eff9..1877008a8aeac00af307b63d3ced8514f83a3f8f 100644 (file)
@@ -1,5 +1,5 @@
 /* BFD back-end for HP PA-RISC ELF files.
-   Copyright (C) 1990, 91, 92, 93, 94, 95, 96, 1997
+   Copyright (C) 1990, 91, 92, 93, 94, 95, 96, 97, 98, 1999
    Free Software Foundation, Inc.
 
    Written by
@@ -636,7 +636,7 @@ elf32_hppa_bfd_final_link_relocate (howto, input_bfd, output_bfd,
     case R_PARISC_PCREL17F:
       {
        bfd_vma location;
-       unsigned int len, caller_args, callee_args;
+       unsigned int len;
        char *new_name, *stub_name;
 
        /* Get the field selector right.  We'll need it in a minute.  */
@@ -986,8 +986,7 @@ elf32_hppa_size_stubs (stub_bfd, output_bfd, link_info)
   bfd *input_bfd;
   asection *section, *stub_sec = 0;
   Elf_Internal_Shdr *symtab_hdr;
-  Elf_Internal_Sym *local_syms, *isym, **all_local_syms;
-  Elf32_External_Sym *ext_syms, *esym;
+  Elf_Internal_Sym *local_syms, **all_local_syms;
   unsigned int i, index, bfd_count = 0;
   struct elf32_hppa_stub_hash_table *stub_hash_table = 0;
 
index b2f852370e9aa39ea08afc60b3ff5c0b781bcff2..7a9f8eb5c9b982efa8590762827b2b4818db50bc 100644 (file)
@@ -1958,6 +1958,9 @@ m32r_elf_gc_mark_hook (abfd, info, rel, h, sym)
  
           case bfd_link_hash_common:
             return h->root.u.c.p->section;
+
+         default:
+           break;
           }
        }
      }
index 23ecf36a14258baec7e91b8f50875baef0182c19..c7ca78599fb43c6167884bf82b4ab369d2e600e9 100644 (file)
@@ -2087,7 +2087,6 @@ elf_m68k_finish_dynamic_sections (output_bfd, info)
   bfd *dynobj;
   asection *sgot;
   asection *sdyn;
-  int plt_entry0_size, plt_off1, plt_off2;
 
   dynobj = elf_hash_table (info)->dynobj;
 
index fe0ddc5dcf3ccabae5e901bd400bf8e4ac5a6706..b54974300cc5bb180a011c327534dd7947d9b873 100644 (file)
@@ -320,7 +320,6 @@ mcore_elf_merge_private_bfd_data (ibfd, obfd)
 {
   flagword old_flags;
   flagword new_flags;
-  boolean error;
 
   /* Check if we have the same endianess */
   if (   ibfd->xvec->byteorder != obfd->xvec->byteorder
@@ -426,7 +425,6 @@ mcore_elf_relocate_section (output_bfd, info, input_bfd, input_section,
   Elf_Internal_Rela *           rel = relocs;
   Elf_Internal_Rela *           relend = relocs + input_section->reloc_count;
   boolean ret = true;
-  long insn;
 
 #ifdef DEBUG
   fprintf (stderr,
@@ -643,6 +641,9 @@ mcore_elf_gc_mark_hook (abfd, info, rel, h, sym)
              
            case bfd_link_hash_common:
              return h->root.u.c.p->section;
+
+           default:
+             break;
            }
        }
     }
index 99833b79e4739beca9a9f9a16495310308cc1241..0917d839fb315fbd650747a5a01fe9230362e9d7 100644 (file)
@@ -118,8 +118,6 @@ static boolean mips_elf_is_local_label_name
   PARAMS ((bfd *, const char *));
 static struct bfd_hash_entry *mips_elf_link_hash_newfunc
   PARAMS ((struct bfd_hash_entry *, struct bfd_hash_table *, const char *));
-static struct bfd_link_hash_table *mips_elf_link_hash_table_create
-  PARAMS ((bfd *));
 static int gptab_compare PARAMS ((const void *, const void *));
 static void mips_elf_relocate_hi16
   PARAMS ((bfd *, Elf_Internal_Rela *, Elf_Internal_Rela *, bfd_byte *,
@@ -277,8 +275,8 @@ typedef enum {
 #else
 #define MIPS_ELF_ADD_DYNAMIC_ENTRY(info, tag, val) \
   (ABI_64_P (elf_hash_table (info)->dynobj)       \
-   : (abort (), false)                             \
-   ? bfd_elf32_add_dynamic_entry (info, tag, val))
+   ? (abort (), false)                             \
+   : bfd_elf32_add_dynamic_entry (info, tag, val))
 #endif
 
 /* The number of local .got entries we reserve.  */
@@ -5227,7 +5225,6 @@ mips_elf_got_offset_from_index (dynobj, output_bfd, index)
 {
   asection *sgot;
   bfd_vma gp;
-  char *error_message;
 
   sgot = mips_elf_got_section (dynobj);
   gp = _bfd_get_gp_value (output_bfd);
@@ -5476,7 +5473,7 @@ mips_elf_got16_entry (abfd, info, value)
        entry += MIPS_ELF_GOT_SIZE (abfd))
     {
       address = MIPS_ELF_GET_WORD (abfd, entry);
-      if (address & 0xffff0000 == value)
+      if ((address & 0xffff0000) == value)
        {
          /* This entry has the right high-order 16 bits.  */
          index = MIPS_ELF_GOT_SIZE (abfd) * (entry - sgot->contents);
@@ -5748,7 +5745,7 @@ mips_elf_calculate_relocation (abfd,
       *namep = bfd_elf_string_from_elf_section (input_bfd,
                                                symtab_hdr->sh_link,
                                                sym->st_name);
-      if (*namep = '\0')
+      if (*namep == '\0')
        *namep = bfd_section_name (input_bfd, sec);
     }
   else
@@ -6168,7 +6165,6 @@ _bfd_mips_elf_relocate_section (output_bfd, info, input_bfd, input_section,
   const Elf_Internal_Rela *relend;
   bfd_vma addend;
   bfd_vma last_hi16_addend;
-  boolean next_relocation_for_same_address_p = false;
   boolean use_saved_addend_p = false;
   boolean last_hi16_addend_valid_p = false;
   struct elf_backend_data *bed;
@@ -6179,7 +6175,6 @@ _bfd_mips_elf_relocate_section (output_bfd, info, input_bfd, input_section,
     {
       const char *name;
       bfd_vma value;
-      int result;
       reloc_howto_type *howto;
 
       /* Find the relocation howto for this relocation.  */
@@ -7630,7 +7625,6 @@ _bfd_mips_elf_size_dynamic_sections (output_bfd, info)
      other dynamic symbol.  */
   {
     unsigned int c, i;
-    struct mips_got_info *g;
 
     c = 0;
     if (elf_hash_table (info)->dynamic_sections_created)
index 0779e8ac091c945039767ad2e43c44243393db92..34918747cb222df47b11b91ce9582e2e4d90ce68 100644 (file)
@@ -1,5 +1,5 @@
 /* Hitachi SH specific support for 32-bit ELF
-   Copyright 1996, 1997, 1998 Free Software Foundation, Inc.
+   Copyright 1996, 1997, 1998, 1999 Free Software Foundation, Inc.
    Contributed by Ian Lance Taylor, Cygnus Support.
 
 This file is part of BFD, the Binary File Descriptor library.
@@ -1999,6 +1999,9 @@ sh_elf_gc_mark_hook (abfd, info, rel, h, sym)
 
           case bfd_link_hash_common:
             return h->root.u.c.p->section;
+
+         default:
+           break;
           }
        }
      }
index f02702c919e3ec6371b30d6f973569724501e774..d089d135c0992354f7c8a5f815b6bc4c52c296bf 100644 (file)
@@ -631,6 +631,9 @@ elf32_sparc_gc_mark_hook (abfd, info, rel, h, sym)
 
           case bfd_link_hash_common:
             return h->root.u.c.p->section;
+
+         default:
+           break;
           }
        }
      }
index 4ca60e8083b381731356c2e61857ae4e4e87793e..9480b0ad8c998387d3668b8c0297b389702dd22f 100644 (file)
@@ -1,5 +1,5 @@
 /* V850-specific support for 32-bit ELF
-   Copyright (C) 1996, 1997, 1998 Free Software Foundation, Inc.
+   Copyright (C) 1996, 1997, 1998, 1999 Free Software Foundation, Inc.
 
 This file is part of BFD, the Binary File Descriptor library.
 
@@ -797,7 +797,6 @@ find_remembered_hi16s_reloc (addend, already_found)
   hi16s_location * entry;
   hi16s_location * previous = NULL;
   hi16s_location * prev;
-  int              i;
   bfd_byte *       addr;
   
   /* Search the table.  Record the most recent entry that matches.  */
@@ -1751,6 +1750,9 @@ v850_elf_gc_mark_hook (abfd, info, rel, h, sym)
 
           case bfd_link_hash_common:
             return h->root.u.c.p->section;
+
+         default:
+           break;
           }
        }
      }
index 69c4d8b6804881578c58911e6ae0367e6171d168..0f2548d3809e562b33b06a3523cfd7c64024fd5a 100644 (file)
@@ -25,12 +25,5 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 #define TARGET_BIG_SYM       arm_epoc_pei_big_vec
 #define TARGET_BIG_NAME      "epoc-pei-arm-big"
 
-#define bfd_arm_allocate_interworking_sections \
-       bfd_arm_epoc_pe_allocate_interworking_sections
-#define bfd_arm_get_bfd_for_interworking \
-       bfd_arm_epoc_pe_get_bfd_for_interworking
-#define bfd_arm_process_before_allocation \
-       bfd_arm_epoc_pe_process_before_allocation
-
 #include "pei-arm.c"
 
index b04214ab11065222f7f4d6e2dba1ebd67babcd69..4ba5b3a5cd0e4e084e46c35c5dde4cc2ac69b722 100644 (file)
@@ -33,13 +33,4 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 #define PCRELOFFSET        true
 #define COFF_LONG_SECTION_NAMES
 
-#ifndef bfd_arm_allocate_interworking_sections 
-#define bfd_arm_allocate_interworking_sections \
-       bfd_arm_pe_allocate_interworking_sections
-#define bfd_arm_get_bfd_for_interworking \
-       bfd_arm_pe_get_bfd_for_interworking
-#define bfd_arm_process_before_allocation \
-       bfd_arm_pe_process_before_allocation
-#endif
-       
 #include "coff-arm.c"
index 6a52462a06d22405c83e68f4a6af4e19208f69a6..f5a2b1fe026417d93dfbf9839ce0c63381d1a298 100644 (file)
@@ -1,6 +1,6 @@
 /* vms-gsd.c -- BFD back-end for VAX (openVMS/VAX) and
    EVAX (openVMS/Alpha) files.
-   Copyright 1996, 1997, 1998 Free Software Foundation Inc.
+   Copyright 1996, 1997, 1998, 1999 Free Software Foundation Inc.
 
    go and read the openVMS linker manual (esp. appendix B)
    if you don't know what's going on here :-)
@@ -354,7 +354,8 @@ _bfd_vms_slurp_gsd (abfd, objtype)
              section = bfd_make_section (abfd, name);
              if (!section)
                {
-                 fprintf (stderr, "bfd_make_section (%s) failed\n", name);
+                 (*_bfd_error_handler) (_("bfd_make_section (%s) failed"),
+                                        name);
                  return -1;
                }
              old_flags = bfd_getl16 (vms_rec + 2);
@@ -366,7 +367,9 @@ _bfd_vms_slurp_gsd (abfd, objtype)
                new_flags |= SEC_IS_COMMON;
              if (!bfd_set_section_flags (abfd, section, new_flags))
                {
-                 fprintf (stderr, "bfd_set_section_flags (%s, %x) failed\n", name, new_flags);
+                 (*_bfd_error_handler)
+                   (_("bfd_set_section_flags (%s, %x) failed"),
+                    name, new_flags);
                  return -1;
                }
              section->alignment_power = vms_rec[1];
@@ -400,7 +403,12 @@ _bfd_vms_slurp_gsd (abfd, objtype)
                  section->contents = old_section->contents;
                  if (section->_raw_size < old_section->_raw_size)
                    {
-                     fprintf (stderr, "Size mismatch section %s=%d, %s=%d\n", old_section->name, old_section->_raw_size, section->name, section->_raw_size);
+                     (*_bfd_error_handler)
+                       (_("Size mismatch section %s=%lx, %s=%lx"),
+                        old_section->name,
+                        (unsigned long) old_section->_raw_size,
+                        section->name,
+                        (unsigned long) section->_raw_size);
                      return -1;
                    }
                  else if (section->_raw_size > old_section->_raw_size)
@@ -725,7 +733,6 @@ _bfd_vms_write_gsd (abfd, objtype)
   char dummy_name[10];
   char *sname;
   flagword new_flags, old_flags;
-  char *nptr, *uptr;
 
 #if VMS_DEBUG
   vms_debug (2, "vms_write_gsd (%p, %d)\n", abfd, objtype);
index 01d20aabefa63303a2f06d99181824378f1adb89..e4ee546dd0e754fdaac2910363bb64e29deddbb6 100644 (file)
@@ -1,6 +1,6 @@
 /* vms-hdr.c -- BFD back-end for VMS/VAX (openVMS/VAX) and
    EVAX (openVMS/Alpha) files.
-   Copyright 1996, 1997, 1998 Free Software Foundation, Inc.
+   Copyright 1996, 1997, 1998, 1999 Free Software Foundation, Inc.
 
    HDR record handling functions
    EMH record handling functions
@@ -334,8 +334,6 @@ _bfd_vms_write_hdr (abfd, objtype)
 
       if (symbol->flags & BSF_FILE)
        {
-         char *s;
-
          if (strncmp ((char *)symbol->name, "<CASE:", 6) == 0)
            {
              PRIV(flag_hash_long_names) = symbol->name[6] - '0';
index 81b1fc8c92fba651200ea2a57d2c0866a0344f63..94678da97b345b01bae3e4b04cdc6906d0d79f78 100644 (file)
@@ -1,6 +1,6 @@
 /* vms-misc.c -- Miscellaneous functions for VAX (openVMS/VAX) and
    EVAX (openVMS/Alpha) files.
-   Copyright 1996, 1997, 1998 Free Software Foundation, Inc.
+   Copyright 1996, 1997, 1998, 1999 Free Software Foundation, Inc.
 
    Written by Klaus K"ampf (kkaempf@rmi.de)
 
@@ -1008,10 +1008,8 @@ _bfd_vms_length_hash_symbol (abfd, in, maxlen)
      const char *in;
      int maxlen;
 {
-  long int init;
   long int result;
   int in_len;
-  char *pnt = 0;
   char *new_name;
   const char *old_name;
   int i;
@@ -1055,7 +1053,7 @@ _bfd_vms_length_hash_symbol (abfd, in, maxlen)
 
   if ((in_len > maxlen)
       && PRIV(flag_hash_long_names))
-    sprintf (out, "_%08x", result);
+    sprintf (out, "_%08lx", result);
   else
     *out = 0;
 
index 782f52bfc04b3a3f810f9fee72efe7e6a4b58c84..6e5d97c34a5246347478b5d88775f6a71b992845 100644 (file)
@@ -1,6 +1,6 @@
 /* vms-tir.c -- BFD back-end for VAX (openVMS/VAX) and
    EVAX (openVMS/Alpha) files.
-   Copyright 1996, 1997, 1998 Free Software Foundation, Inc.
+   Copyright 1996, 1997, 1998, 1999 Free Software Foundation, Inc.
 
    TIR record handling functions
    ETIR record handling functions
@@ -949,8 +949,6 @@ alloc_section (abfd, idx)
      bfd *abfd;
      int idx;
 {
-  asection *section;
-
 #if VMS_DEBUG
   _bfd_vms_debug (4,  "alloc_section %d\n", idx);
 #endif
index a5fc13ad94249ac718f08c60362669dbbd339af0..2a009c9a6f64414e6bb4cb4406a6fd96c909e83d 100644 (file)
--- a/bfd/vms.c
+++ b/bfd/vms.c
@@ -1,6 +1,6 @@
 /* vms.c -- BFD back-end for VAX (openVMS/VAX) and
    EVAX (openVMS/Alpha) files.
-   Copyright 1996, 1997, 1998 Free Software Foundation, Inc.
+   Copyright 1996, 1997, 1998, 1999 Free Software Foundation, Inc.
 
    Written by Klaus K"ampf (kkaempf@rmi.de)
 
@@ -357,8 +357,6 @@ static boolean
 vms_fixup_sections (abfd)
      bfd *abfd;
 {
-  asection *s;
-
   if (PRIV(fixup_done))
     return true;
 
@@ -646,7 +644,6 @@ vms_close_and_cleanup (abfd)
 {
   asection *sec;
   vms_section *es, *es1;
-  vms_reloc *er, *er1;
   int i;
 
 #if VMS_DEBUG