* config/obj-som.h (S_SET_OTHER, S_SET_TYPE): Delete a.out crud.
authorJeff Law <law@redhat.com>
Wed, 14 Sep 1994 02:20:24 +0000 (02:20 +0000)
committerJeff Law <law@redhat.com>
Wed, 14 Sep 1994 02:20:24 +0000 (02:20 +0000)
(S_SET_DESC, S_GET_OTHER, S_GET_TYPE, S_GET_DESC): Likewise.
(obj_attach_unwind_info): Do not define.  Not needed anymore.
* config/tc-hppa.c: Delete whitespace at EOL.
(struct hppa_fix_struct): Delete fx_unwind field and all references.
(fix_new_hppa): Last arg is now a pointer to an int.  Do not
call obj_attach_unwind_info anymore.  For SOM R_ENTRY and R_EXIT
fixups, store 32bits of unwind information in the fx_addnumber
field of the fixup.
(md_assemble, pa_entry, process_exit, pa_procend): For SOM R_ENTRY
and R_EXIT fixups, pass a NULL pointer to fix_new_hppa, and a
pointer to 32 bits of unwind info.
(tc_gen_reloc): For SOM R_ENTRY and R_EXIT fixups, set the symbol
pointer to the dummy symbol; set the addend field to fx_addnumber.
(pa_comm, pa_equ, pa_type_args, pa_import): Use bfd_XXX_section_ptr
rather than &bfd_XXX_section.

gas/ChangeLog
gas/config/tc-hppa.c

index 40a6e88..0c84cba 100644 (file)
@@ -1,3 +1,22 @@
+Tue Sep 13 20:05:47 1994  Jeff Law  (law@snake.cs.utah.edu)
+
+       * config/obj-som.h (S_SET_OTHER, S_SET_TYPE): Delete a.out crud.
+       (S_SET_DESC, S_GET_OTHER, S_GET_TYPE, S_GET_DESC): Likewise.
+       (obj_attach_unwind_info): Do not define.  Not needed anymore.
+       * config/tc-hppa.c: Delete whitespace at EOL.
+       (struct hppa_fix_struct): Delete fx_unwind field and all references.
+       (fix_new_hppa): Last arg is now a pointer to an int.  Do not
+       call obj_attach_unwind_info anymore.  For SOM R_ENTRY and R_EXIT
+       fixups, store 32bits of unwind information in the fx_addnumber
+       field of the fixup.
+       (md_assemble, pa_entry, process_exit, pa_procend): For SOM R_ENTRY
+       and R_EXIT fixups, pass a NULL pointer to fix_new_hppa, and a
+       pointer to 32 bits of unwind info. 
+       (tc_gen_reloc): For SOM R_ENTRY and R_EXIT fixups, set the symbol
+       pointer to the dummy symbol; set the addend field to fx_addnumber.
+       (pa_comm, pa_equ, pa_type_args, pa_import): Use bfd_XXX_section_ptr
+       rather than &bfd_XXX_section.
+
 Tue Sep 13 21:15:36 1994  Ken Raeburn  (raeburn@cujo.cygnus.com)
 
        * config/tc-i386.c (md_apply_fix_1): For GOTPC relocs, decrement
index ceecc47..f16eaff 100644 (file)
@@ -178,7 +178,7 @@ typedef enum
   }
 pa_symbol_type;
 
-/* This structure contains information needed to assemble 
+/* This structure contains information needed to assemble
    individual instructions.  */
 struct pa_it
   {
@@ -283,7 +283,7 @@ typedef struct subspace_dictionary_chain ssd_chain_struct;
 
 struct space_dictionary_chain
   {
-    /* Nonzero if this space has been defined by the user code or 
+    /* Nonzero if this space has been defined by the user code or
        as a default space.  */
     unsigned int sd_defined;
 
@@ -421,9 +421,6 @@ struct hppa_fix_struct
     /* Argument relocation bits.  */
     long fx_arg_reloc;
 
-    /* The unwind descriptor associated with this fixup.  */
-    char fx_unwind[8];
-
     /* The segment this fixup appears in.  */
     segT segment;
   };
@@ -529,7 +526,7 @@ static void fix_new_hppa PARAMS ((fragS *, int, int, symbolS *,
                                  long, expressionS *, int,
                                  bfd_reloc_code_real_type,
                                  enum hppa_reloc_field_selector_type,
-                                 int, long, char *));
+                                 int, long, int *));
 static int is_end_of_statement PARAMS ((void));
 static int reg_name_search PARAMS ((char *));
 static int pa_chk_field_selector PARAMS ((char **));
@@ -652,9 +649,9 @@ const char line_separator_chars[] = "!";
 const char EXP_CHARS[] = "eE";
 
 /* Chars that mean this number is a floating point constant.
-   As in 0f12.456 or 0d1.2345e12. 
+   As in 0f12.456 or 0d1.2345e12.
 
-   Be aware that MAXIMUM_NUMBER_OF_CHARS_FOR_FLOAT may have to be 
+   Be aware that MAXIMUM_NUMBER_OF_CHARS_FOR_FLOAT may have to be
    changed in read.c.  Ideally it shouldn't hae to know abou it at
    all, but nothing is ideal around here.  */
 const char FLT_CHARS[] = "rRsSfFdDxXpP";
@@ -691,10 +688,10 @@ static int print_errors = 1;
 /* List of registers that are pre-defined:
 
    Each general register has one predefined name of the form
-   %r<REGNUM> which has the value <REGNUM>.  
+   %r<REGNUM> which has the value <REGNUM>.
 
    Space and control registers are handled in a similar manner,
-   but use %sr<REGNUM> and %cr<REGNUM> as their predefined names. 
+   but use %sr<REGNUM> and %cr<REGNUM> as their predefined names.
 
    Likewise for the floating point registers, but of the form
    %fr<REGNUM>.  Floating point registers have additional predefined
@@ -710,7 +707,7 @@ static int print_errors = 1;
    %r2  has %rp as a synonym
 
    Almost every control register has a synonym; they are not listed
-   here for brevity.  
+   here for brevity.
 
    The table is sorted. Suitable for searching by a binary search. */
 
@@ -915,7 +912,7 @@ static const struct pd_reg pre_defined_registers[] =
 };
 
 /* This table is sorted by order of the length of the string. This is
-   so we check for <> before we check for <. If we had a <> and checked 
+   so we check for <> before we check for <. If we had a <> and checked
    for < first, we would get a false match.  */
 static const struct fp_cond_map fp_cond_map[] =
 {
@@ -1030,7 +1027,7 @@ static struct default_space_dict pa_def_spaces[] =
     continue; \
   }
 
-/* Simple range checking for FIELD againt HIGH and LOW bounds.  
+/* Simple range checking for FIELD againt HIGH and LOW bounds.
    IGNORE is used to suppress the error message.  */
 
 #define CHECK_FIELD(FIELD, HIGH, LOW, IGNORE) \
@@ -1140,12 +1137,12 @@ pa_undefine_label ()
    code needs to keep track of some extra stuff.  Each call to fix_new_hppa
    results in the creation of an instance of an hppa_fix_struct.  An
    hppa_fix_struct stores the extra information along with a pointer to the
-   original fixS.  This is attached to the original fixup via the 
+   original fixS.  This is attached to the original fixup via the
    tc_fix_data field.  */
 
 static void
 fix_new_hppa (frag, where, size, add_symbol, offset, exp, pcrel,
-             r_type, r_field, r_format, arg_reloc, unwind_desc)
+             r_type, r_field, r_format, arg_reloc, unwind_bits)
      fragS *frag;
      int where;
      int size;
@@ -1157,7 +1154,7 @@ fix_new_hppa (frag, where, size, add_symbol, offset, exp, pcrel,
      enum hppa_reloc_field_selector_type r_field;
      int r_format;
      long arg_reloc;
-     char *unwind_desc;
+     int* unwind_bits;
 {
   fixS *new_fix;
 
@@ -1174,17 +1171,10 @@ fix_new_hppa (frag, where, size, add_symbol, offset, exp, pcrel,
   hppa_fix->fx_r_format = r_format;
   hppa_fix->fx_arg_reloc = arg_reloc;
   hppa_fix->segment = now_seg;
-  if (unwind_desc)
-    {
-      bcopy (unwind_desc, hppa_fix->fx_unwind, 8);
-
-      /* If necessary call BFD backend function to attach the
-         unwind bits to the target dependent parts of a BFD symbol.
-         Yuk.  */
-#ifdef obj_attach_unwind_info
-      obj_attach_unwind_info (add_symbol->bsym, unwind_desc);
+#ifdef OBJ_SOM
+  if (r_type == R_ENTRY || r_type == R_EXIT)
+    new_fix->fx_addnumber = *unwind_bits;
 #endif
-    }
 
   /* foo-$global$ is used to access non-automatic storage.  $global$
      is really just a marker and has served its purpose, so eliminate
@@ -1230,7 +1220,7 @@ cons_fix_new_hppa (frag, where, size, exp)
 
   fix_new_hppa (frag, where, size,
                (symbolS *) NULL, (offsetT) 0, exp, 0, rel_type,
-               hppa_field_selector, 32, 0, (char *) 0);
+               hppa_field_selector, 32, 0, NULL);
 
   /* Reset field selector to its default state.  */
   hppa_field_selector = 0;
@@ -1307,7 +1297,7 @@ md_assemble (str)
 
   /* If we are within a procedure definition, make sure we've
      defined a label for the procedure; handle case where the
-     label was defined after the .PROC directive. 
+     label was defined after the .PROC directive.
 
      Note there's not need to diddle with the segment or fragment
      for the label symbol in this case.  We have already switched
@@ -1330,9 +1320,9 @@ md_assemble (str)
                  char *where = frag_more (0);
 
                  fix_new_hppa (frag_now, where - frag_now->fr_literal, 0,
-                               last_call_info->start_symbol, (offsetT) 0, NULL,
+                               NULL, (offsetT) 0, NULL,
                                0, R_HPPA_ENTRY, e_fsel, 0, 0,
-                               (char *) &last_call_info->ci_unwind.descriptor);
+                               (int *)&last_call_info->ci_unwind.descriptor);
                }
 #endif
            }
@@ -1931,7 +1921,7 @@ pa_ip (str)
                    cmpltr = 6;
                  else if (strcasecmp (name, "ev") == 0)
                    cmpltr = 7;
-                 /* Handle movb,n.  Put things back the way they were.  
+                 /* Handle movb,n.  Put things back the way they were.
                     This includes moving s back to where it started.  */
                  else if (strcasecmp (name, "n") == 0 && *args == '|')
                    {
@@ -2329,7 +2319,7 @@ pa_ip (str)
            case '4':
              {
                struct pa_89_fp_reg_struct result;
-               
+
                pa_parse_number (&s, &result);
                CHECK_FIELD (result.number_part, 31, 0, 0);
                if (the_insn.fpof1 == SGL)
@@ -2646,7 +2636,7 @@ tc_gen_reloc (section, fixp)
             relocation should be either 0 (no static link) or 2
             (static link required).
 
-            FIXME: We always assume no static link! 
+            FIXME: We always assume no static link!
 
             We also slam a zero addend into the DLT relative relocs;
             it doesn't make a lot of sense to use any addend since
@@ -2658,7 +2648,6 @@ tc_gen_reloc (section, fixp)
        case R_S_MODE:
        case R_D_MODE:
        case R_R_MODE:
-       case R_EXIT:
        case R_FSEL:
        case R_LSEL:
        case R_RSEL:
@@ -2667,6 +2656,13 @@ tc_gen_reloc (section, fixp)
          relocs[i]->addend = 0;
          break;
 
+       case R_ENTRY:
+       case R_EXIT:
+         /* There is no symbol associated with these fixups.  */
+         relocs[i]->sym_ptr_ptr = &dummy_symbol->bsym;
+         relocs[i]->addend = fixp->fx_addnumber;
+         break;
+
        default:
          if (fixp->fx_addsy && fixp->fx_addsy->bsym->flags & BSF_FUNCTION)
            relocs[i]->addend = 0;
@@ -2819,7 +2815,7 @@ md_apply_fix (fixP, valp)
   valueT val = *valp;
 
   hppa_fixP = (struct hppa_fix_struct *) fixP->tc_fix_data;
-  /* SOM uses R_HPPA_ENTRY and R_HPPA_EXIT relocations which can 
+  /* SOM uses R_HPPA_ENTRY and R_HPPA_EXIT relocations which can
      never be "applied" (they are just markers).  */
 #ifdef OBJ_SOM
   if (fixP->fx_r_type == R_HPPA_ENTRY
@@ -2989,7 +2985,7 @@ md_pcrel_from (fixP)
   return fixP->fx_where + fixP->fx_frag->fr_address;
 }
 
-/* Return nonzero if the input line pointer is at the end of 
+/* Return nonzero if the input line pointer is at the end of
    a statement.  */
 
 static int
@@ -3095,7 +3091,7 @@ pa_parse_number (s, result)
       p++;
       c = *p;
       /* Tege hack: Special case for general registers as the general
-         code makes a binary search with case translation, and is VERY 
+         code makes a binary search with case translation, and is VERY
          slow. */
       if (c == 'r')
        {
@@ -3437,7 +3433,7 @@ pa_get_absolute_expression (insn, strp)
   return evaluate_absolute (insn);
 }
 
-/* Evaluate an absolute expression EXP which may be modified by 
+/* Evaluate an absolute expression EXP which may be modified by
    the selector FIELD_SELECTOR.  Return the value of the expression.  */
 static int
 evaluate_absolute (insn)
@@ -4003,7 +3999,7 @@ is_same_frag (frag1, frag2)
 }
 
 #ifdef OBJ_ELF
-/* Build an entry in the UNWIND subspace from the given function 
+/* Build an entry in the UNWIND subspace from the given function
    attributes in CALL_INFO.  This is not needed for SOM as using
    R_ENTRY and R_EXIT relocations allow the linker to handle building
    of the unwind spaces.  */
@@ -4043,16 +4039,14 @@ pa_build_unwind_subspace (call_info)
   /* Relocation info. for start offset of the function.  */
   fix_new_hppa (frag_now, p - frag_now->fr_literal, 4,
                call_info->start_symbol, (offsetT) 0,
-               (expressionS *) NULL, 0, R_PARISC_DIR32, e_fsel, 32, 0,
-               (char *) 0);
+               (expressionS *) NULL, 0, R_PARISC_DIR32, e_fsel, 32, 0, NULL);
 
   p = frag_more (4);
 
   /* Relocation info. for end offset of the function.  */
   fix_new_hppa (frag_now, p - frag_now->fr_literal, 4,
                call_info->end_symbol, (offsetT) 0,
-               (expressionS *) NULL, 0, R_PARISC_DIR32, e_fsel, 32, 0,
-               (char *) 0);
+               (expressionS *) NULL, 0, R_PARISC_DIR32, e_fsel, 32, 0, NULL);
 
   /* Dump it. */
   unwind = (char *) &call_info->ci_unwind;
@@ -4118,7 +4112,7 @@ pa_callinfo (unused)
          input_line_pointer++;
          temp = get_absolute_expression ();
          /* The HP assembler accepts 19 as the high bound for ENTRY_GR
-            even though %r19 is caller saved.  I think this is a bug in 
+            even though %r19 is caller saved.  I think this is a bug in
             the HP assembler, and we are not going to emulate it.  */
          if (temp < 3 || temp > 18)
            as_bad ("Value for ENTRY_GR must be in the range 3..18\n");
@@ -4130,7 +4124,7 @@ pa_callinfo (unused)
          *p = c;
          input_line_pointer++;
          temp = get_absolute_expression ();
-         /* Similarly the HP assembler takes 31 as the high bound even 
+         /* Similarly the HP assembler takes 31 as the high bound even
             though %fr21 is the last callee saved floating point register.  */
          if (temp < 12 || temp > 21)
            as_bad ("Value for ENTRY_FR must be in the range 12..21\n");
@@ -4217,7 +4211,7 @@ pa_code (unused)
 {
   sd_chain_struct *sdchain;
 
-  /* First time through it might be necessary to create the 
+  /* First time through it might be necessary to create the
      $TEXT$ space.  */
   if ((sdchain = is_defined_space ("$TEXT$")) == NULL)
     {
@@ -4263,9 +4257,9 @@ pa_comm (unused)
 
   if (symbol)
     {
-      /* It is incorrect to check S_IS_DEFINED at this point as 
-         the symbol will *always* be defined.  FIXME.  How to 
-         correctly determine when this label really as been 
+      /* It is incorrect to check S_IS_DEFINED at this point as
+         the symbol will *always* be defined.  FIXME.  How to
+         correctly determine when this label really as been
          defined before.  */
       if (S_GET_VALUE (symbol))
        {
@@ -4279,7 +4273,7 @@ pa_comm (unused)
       else
        {
          S_SET_VALUE (symbol, size);
-         S_SET_SEGMENT (symbol, &bfd_und_section);
+         S_SET_SEGMENT (symbol, bfd_und_section_ptr);
          S_SET_EXTERNAL (symbol);
 
          /* colon() has already set the frag to the current location in the
@@ -4339,9 +4333,9 @@ pa_entry (unused)
       char *where = frag_more (0);
 
       fix_new_hppa (frag_now, where - frag_now->fr_literal, 0,
-                   last_call_info->start_symbol, (offsetT) 0, NULL,
+                   NULL, (offsetT) 0, NULL,
                    0, R_HPPA_ENTRY, e_fsel, 0, 0,
-                   (char *) &last_call_info->ci_unwind.descriptor);
+                   (int *) &last_call_info->ci_unwind.descriptor);
     }
 #endif
 }
@@ -4362,7 +4356,7 @@ pa_equ (reg)
        S_SET_VALUE (symbol, pa_parse_number (&input_line_pointer, 0));
       else
        S_SET_VALUE (symbol, (unsigned int) get_absolute_expression ());
-      S_SET_SEGMENT (symbol, &bfd_abs_section);
+      S_SET_SEGMENT (symbol, bfd_abs_section_ptr);
     }
   else
     {
@@ -4404,8 +4398,9 @@ process_exit ()
      if we split the unwind bits up between the relocations which
      denote the entry and exit points.  */
   fix_new_hppa (frag_now, where - frag_now->fr_literal, 0,
-               last_call_info->start_symbol, (offsetT) 0,
-               NULL, 0, R_HPPA_EXIT, e_fsel, 0, 0, NULL);
+               NULL, (offsetT) 0,
+               NULL, 0, R_HPPA_EXIT, e_fsel, 0, 0,
+               (int *) &last_call_info->ci_unwind.descriptor + 1);
 #endif
 }
 
@@ -4436,7 +4431,7 @@ pa_exit (unused)
 }
 
 /* Process a .EXPORT directive.  This makes functions external
-   and provides information such as argument relocation entries 
+   and provides information such as argument relocation entries
    to callers.  */
 
 static void
@@ -4489,7 +4484,7 @@ pa_type_args (symbolP, is_export)
     {
       input_line_pointer += 8;
       symbolP->bsym->flags &= ~BSF_FUNCTION;
-      S_SET_SEGMENT (symbolP, &bfd_abs_section);
+      S_SET_SEGMENT (symbolP, bfd_abs_section_ptr);
       type = SYMBOL_TYPE_ABSOLUTE;
     }
   else if (strncasecmp (input_line_pointer, "code", 4) == 0)
@@ -4645,7 +4640,7 @@ pa_import (unused)
       else
        {
          /* Sigh.  To be compatable with the HP assembler and to help
-            poorly written assembly code, we assign a type based on 
+            poorly written assembly code, we assign a type based on
             the the current segment.  Note only BSF_FUNCTION really
             matters, we do not need to set the full SYMBOL_TYPE_* info.  */
          if (now_seg == text_section)
@@ -4653,7 +4648,7 @@ pa_import (unused)
 
          /* If the section is undefined, then the symbol is undefined
             Since this is an import, leave the section undefined.  */
-         S_SET_SEGMENT (symbol, &bfd_und_section);
+         S_SET_SEGMENT (symbol, bfd_und_section_ptr);
        }
     }
   else
@@ -4782,11 +4777,11 @@ pa_proc (unused)
       seg = subseg_force_new ("$CODE$", 0);
 
       /* Now set the flags.  */
-      bfd_set_section_flags (stdoutput, seg, 
+      bfd_set_section_flags (stdoutput, seg,
                             bfd_get_section_flags (abfd, text_section));
 
       /* Record any alignment request for this section.  */
-      record_alignment (seg, 
+      record_alignment (seg,
                        bfd_get_section_alignment (stdoutput, text_section));
 
       /* Change the "text_section" to be our new $CODE$ subspace.  */
@@ -4862,7 +4857,7 @@ pa_proc (unused)
   demand_empty_rest_of_line ();
 }
 
-/* Process the syntatical end of a procedure.  Make sure all the 
+/* Process the syntatical end of a procedure.  Make sure all the
    appropriate pseudo-ops were found within the procedure.  */
 
 static void
@@ -4872,7 +4867,7 @@ pa_procend (unused)
 
   /* If we are within a procedure definition, make sure we've
      defined a label for the procedure; handle case where the
-     label was defined after the .PROC directive. 
+     label was defined after the .PROC directive.
 
      Note there's not need to diddle with the segment or fragment
      for the label symbol in this case.  We have already switched
@@ -4895,9 +4890,9 @@ pa_procend (unused)
                  char *where = frag_more (0);
 
                  fix_new_hppa (frag_now, where - frag_now->fr_literal, 0,
-                               last_call_info->start_symbol, (offsetT) 0, NULL,
+                               NULL, (offsetT) 0, NULL,
                                0, R_HPPA_ENTRY, e_fsel, 0, 0,
-                               (char *) &last_call_info->ci_unwind.descriptor);
+                               (int *) &last_call_info->ci_unwind.descriptor);
                }
 #endif
            }
@@ -4971,7 +4966,7 @@ pa_parse_space_stmt (space_name, create_flag)
       print_errors = FALSE;
       ptemp = input_line_pointer + 1;
       /* First see if the space was specified as a number rather than
-         as a name.  According to the PA assembly manual the rest of 
+         as a name.  According to the PA assembly manual the rest of
          the line should be ignored.  */
       temp = pa_parse_number (&ptemp, 0);
       if (temp >= 0)
@@ -5029,7 +5024,7 @@ pa_parse_space_stmt (space_name, create_flag)
     seg = subseg_new (space_name, 0);
 
   /* If create_flag is nonzero, then create the new space with
-     the attributes computed above.  Else set the values in 
+     the attributes computed above.  Else set the values in
      an already existing space -- this can only happen for
      the first occurence of a built-in space.  */
   if (create_flag)
@@ -5196,7 +5191,7 @@ pa_spnum (unused)
   demand_empty_rest_of_line ();
 }
 
-/* If VALUE is an exact power of two between zero and 2^31, then 
+/* If VALUE is an exact power of two between zero and 2^31, then
    return log2 (VALUE).  Else return -1.  */
 
 static int
@@ -5215,9 +5210,9 @@ log2 (value)
 }
 
 /* Handle a .SUBSPACE pseudo-op; this switches the current subspace to the
-   given subspace, creating the new subspace if necessary. 
+   given subspace, creating the new subspace if necessary.
 
-   FIXME.  Should mirror pa_space more closely, in particular how 
+   FIXME.  Should mirror pa_space more closely, in particular how
    they're broken up into subroutines.  */
 
 static void
@@ -5386,7 +5381,7 @@ pa_subspace (unused)
       flags |= SEC_RELOC | SEC_HAS_CONTENTS;
       applicable &= flags;
 
-      /* If this is an existing subspace, then we want to use the 
+      /* If this is an existing subspace, then we want to use the
          segment already associated with the subspace.
 
          FIXME NOW!  ELF BFD doesn't appear to be ready to deal with
@@ -5781,7 +5776,7 @@ is_defined_space (name)
   return NULL;
 }
 
-/* Find and return the space associated with the given seg.  If no mapping 
+/* Find and return the space associated with the given seg.  If no mapping
    from the given seg to a space is found, then return NULL.
 
    Unlike subspaces, the number of spaces is not expected to grow much,
@@ -5840,7 +5835,7 @@ is_defined_subspace (name)
 /* Find and return the subspace associated with the given seg.  If no
    mapping from the given seg to a subspace is found, then return NULL.
 
-   If we ever put each procedure/function within its own subspace 
+   If we ever put each procedure/function within its own subspace
    (to make life easier on the compiler and linker), then this will have
    to become more efficient.  */
 
@@ -5873,7 +5868,7 @@ pa_subsegment_to_subspace (seg, subseg)
   return NULL;
 }
 
-/* Given a number, try and find a space with the name number.  
+/* Given a number, try and find a space with the name number.
 
    Return a pointer to a space dictionary chain entry for the space
    that was found or NULL on failure.  */
@@ -5924,7 +5919,7 @@ pa_next_subseg (space)
   return space->sd_last_subseg;
 }
 
-/* Helper function for pa_stringer.  Used to find the end of 
+/* Helper function for pa_stringer.  Used to find the end of
    a string.  */
 
 static unsigned int
@@ -5954,7 +5949,7 @@ pa_stringer (append_zero)
   int i;
 
   /* Preprocess the string to handle PA-specific escape sequences.
-     For example, \xDD where DD is a hexidecimal number should be 
+     For example, \xDD where DD is a hexidecimal number should be
      changed to \OOO where OOO is an octal number.  */
 
   /* Skip the opening quote.  */
@@ -6101,7 +6096,7 @@ pa_lsym (unused)
   pa_undefine_label ();
 }
 
-/* Switch to the text space.  Like s_text, but delete our 
+/* Switch to the text space.  Like s_text, but delete our
    label when finished.  */
 static void
 pa_text (unused)
@@ -6111,7 +6106,7 @@ pa_text (unused)
   pa_undefine_label ();
 }
 
-/* On the PA relocations which involve function symbols must not be 
+/* On the PA relocations which involve function symbols must not be
    adjusted.  This so that the linker can know when/how to create argument
    relocation stubs for indirect calls and calls to static functions.
 
@@ -6212,10 +6207,10 @@ hppa_elf_mark_end_of_function ()
   if (name)
     {
       symbolS *symbolP;
-      
+
       strcpy (name, "L$\001end_");
       strcat (name, S_GET_NAME (last_call_info->start_symbol));
-      
+
       /* If we have a .exit followed by a .procend, then the
         symbol will have already been defined.  */
       symbolP = symbol_find (name);
@@ -6223,7 +6218,7 @@ hppa_elf_mark_end_of_function ()
        {
          /* The symbol has already been defined!  This can
             happen if we have a .exit followed by a .procend.
-            
+
             This is *not* an error.  All we want to do is free
             the memory we just allocated for the name and continue.  */
          xfree (name);
@@ -6236,7 +6231,7 @@ hppa_elf_mark_end_of_function ()
                                (valueT) (obstack_next_free (&frags)
                                          - frag_now->fr_literal - 4),
                                frag_now);
-         
+
          assert (symbolP);
          symbolP->bsym->flags = BSF_LOCAL;
          symbol_table_insert (symbolP);
@@ -6246,11 +6241,11 @@ hppa_elf_mark_end_of_function ()
        last_call_info->end_symbol = symbolP;
       else
        as_bad ("Symbol '%s' could not be created.", name);
-      
+
     }
   else
     as_bad ("No memory for symbol name.");
-  
+
 }
 
 /* For ELF, this function serves one purpose:  to setup the st_size