* config/tc-mips.c (load_address, macro): Update comments about
[deliverable/binutils-gdb.git] / gas / config / obj-aout.c
index 2c7f5dfd3a90b6d784cf0470e074edce4959d02c..6e5fd29191a1bfc51c6c0960c98e387aba67c5a7 100644 (file)
@@ -1,6 +1,6 @@
 /* a.out object file format
-   Copyright (C) 1989, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 2000
-   Free Software Foundation, Inc.
+   Copyright 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1999, 2000,
+   2001, 2002 Free Software Foundation, Inc.
 
 This file is part of GAS, the GNU Assembler.
 
@@ -17,7 +17,7 @@ the GNU General Public License for more details.
 You should have received a copy of the GNU General Public License
 along with GAS; see the file COPYING.  If not, write to the Free
 Software Foundation, 59 Temple Place - Suite 330, Boston, MA
-02111-1307, USA. */
+02111-1307, USA.  */
 
 #define OBJ_HEADER "obj-aout.h"
 
@@ -99,7 +99,6 @@ const pseudo_typeS aout_pseudo_table[] =
   {NULL, NULL, 0}              /* end sentinel */
 };                             /* aout_pseudo_table */
 
-
 #ifdef BFD_ASSEMBLER
 
 void
@@ -201,13 +200,13 @@ obj_aout_frob_symbol (sym, punt)
 }
 
 void
-obj_aout_frob_file ()
+obj_aout_frob_file_before_fix ()
 {
   /* Relocation processing may require knowing the VMAs of the sections.
      Since writing to a section will cause the BFD back end to compute the
      VMAs, fake it out here....  */
   bfd_byte b = 0;
-  boolean x = true;
+  bfd_boolean x = TRUE;
   if (bfd_section_size (stdoutput, text_section) != 0)
     {
       x = bfd_set_section_contents (stdoutput, text_section, &b, (file_ptr) 0,
@@ -218,12 +217,12 @@ obj_aout_frob_file ()
       x = bfd_set_section_contents (stdoutput, data_section, &b, (file_ptr) 0,
                                    (bfd_size_type) 1);
     }
-  assert (x == true);
+  assert (x);
 }
 
 #else /* ! BFD_ASSEMBLER */
 
-/* Relocation. */
+/* Relocation.  */
 
 /*
  *             emit_relocations()
@@ -233,7 +232,7 @@ obj_aout_frob_file ()
 void
 obj_emit_relocations (where, fixP, segment_address_in_file)
      char **where;
-     fixS *fixP;               /* Fixup chain for this segment. */
+     fixS *fixP;               /* Fixup chain for this segment.  */
      relax_addressT segment_address_in_file;
 {
   for (; fixP; fixP = fixP->fx_next)
@@ -322,13 +321,13 @@ obj_emit_symbols (where, symbol_rootP)
   for (symbolP = symbol_rootP; symbolP; symbolP = symbol_next (symbolP))
     {
       /* Used to save the offset of the name. It is used to point
-        to the string in memory but must be a file offset. */
+        to the string in memory but must be a file offset.  */
       register char *temp;
 
       temp = S_GET_NAME (symbolP);
       S_SET_OFFSET (symbolP, symbolP->sy_name_offset);
 
-      /* Any symbol still undefined and is not a dbg symbol is made N_EXT. */
+      /* Any symbol still undefined and is not a dbg symbol is made N_EXT.  */
       if (!S_IS_DEBUG (symbolP) && !S_IS_DEFINED (symbolP))
        S_SET_EXTERNAL (symbolP);
 
@@ -359,7 +358,7 @@ obj_aout_line (ignore)
 {
   /* Assume delimiter is part of expression.
      BSD4.2 as fails with delightful bug, so we
-     are not being incompatible here. */
+     are not being incompatible here.  */
   new_logical_line ((char *) NULL, (int) (get_absolute_expression ()));
   demand_empty_rest_of_line ();
 }                              /* obj_aout_line() */
@@ -450,7 +449,7 @@ obj_crawl_symbol_chain (headers)
 
   tc_crawl_symbol_chain (headers);
 
-  symbolPP = &symbol_rootP;    /*->last symbol chain link. */
+  symbolPP = &symbol_rootP;    /*->last symbol chain link.  */
   while ((symbolP = *symbolPP) != NULL)
     {
       if (symbolP->sy_mri_common)
@@ -465,14 +464,18 @@ obj_crawl_symbol_chain (headers)
       if (flag_readonly_data_in_text && (S_GET_SEGMENT (symbolP) == SEG_DATA))
        {
          S_SET_SEGMENT (symbolP, SEG_TEXT);
-       }                       /* if pusing data into text */
+       }                       /* if pushing data into text */
 
-      resolve_symbol_value (symbolP, 1);
+      resolve_symbol_value (symbolP);
 
       /* Skip symbols which were equated to undefined or common
-        symbols.  */
+        symbols.  Also skip defined uncommon symbols which can
+        be resolved since in this case they should have been
+        resolved to a non-symbolic constant.  */
       if (symbolP->sy_value.X_op == O_symbol
-         && (! S_IS_DEFINED (symbolP) || S_IS_COMMON (symbolP)))
+         && (! S_IS_DEFINED (symbolP)
+             || S_IS_COMMON (symbolP)
+             || symbol_resolved_p (symbolP)))
        {
          *symbolPP = symbol_next (symbolP);
          continue;
@@ -491,8 +494,7 @@ obj_crawl_symbol_chain (headers)
         switch was passed to gas.
 
         All other symbols are output.  We complain if a deleted
-        symbol was marked external. */
-
+        symbol was marked external.  */
 
       if (!S_IS_REGISTER (symbolP)
          && (!S_GET_NAME (symbolP)
@@ -508,11 +510,11 @@ obj_crawl_symbol_chain (headers)
                           end of each string */
          if (!S_IS_STABD (symbolP))
            {
-             /* Ordinary case. */
+             /* Ordinary case.  */
              symbolP->sy_name_offset = string_byte_count;
              string_byte_count += strlen (S_GET_NAME (symbolP)) + 1;
            }
-         else                  /* .Stabd case. */
+         else                  /* .Stabd case.  */
            symbolP->sy_name_offset = 0;
          symbolPP = &symbolP->sy_next;
        }
@@ -524,7 +526,7 @@ obj_crawl_symbol_chain (headers)
               register names...  */
            {
              as_bad (_("Local symbol %s never defined."), decode_local_label_name (S_GET_NAME (symbolP)));
-           }                   /* oops. */
+           }                   /* oops.  */
 
          /* Unhook it from the chain */
          *symbolPP = symbol_next (symbolP);
@@ -574,62 +576,6 @@ obj_pre_write_hook (headers)
   tc_aout_pre_write_hook (headers);
 }
 
-void
-s_sect ()
-{
-  /* Strip out the section name */
-  char *section_name;
-  char *section_name_end;
-  char c;
-
-  unsigned int len;
-  unsigned int exp;
-  char *save;
-
-  section_name = input_line_pointer;
-  c = get_symbol_end ();
-  section_name_end = input_line_pointer;
-
-  len = section_name_end - section_name;
-  input_line_pointer++;
-  save = input_line_pointer;
-
-  SKIP_WHITESPACE ();
-  if (c == ',')
-    {
-      exp = get_absolute_expression ();
-    }
-  else if (*input_line_pointer == ',')
-    {
-      input_line_pointer++;
-      exp = get_absolute_expression ();
-    }
-  else
-    {
-      input_line_pointer = save;
-      exp = 0;
-    }
-  if (exp >= 1000)
-    {
-      as_bad (_("subsegment index too high"));
-    }
-
-  if (strcmp (section_name, ".text") == 0)
-    {
-      subseg_set (SEG_TEXT, (subsegT) exp);
-    }
-
-  if (strcmp (section_name, ".data") == 0)
-    {
-      if (flag_readonly_data_in_text)
-       subseg_set (SEG_TEXT, (subsegT) exp + 1000);
-      else
-       subseg_set (SEG_DATA, (subsegT) exp);
-    }
-
-  *section_name_end = c;
-}
-
 #endif /* ! BFD_ASSEMBLER */
 
 #ifdef BFD_ASSEMBLER
@@ -733,7 +679,9 @@ const struct format_ops aout_format_ops =
   0,   /* begin */
   0,   /* app_file */
   obj_aout_frob_symbol,
-  obj_aout_frob_file,
+  0,   /* frob_file */
+  0,   /* frob_file_before_adjust */
+  obj_aout_frob_file_before_fix,
   0,   /* frob_file_after_relocs */
   0,   /* s_get_size */
   0,   /* s_set_size */
@@ -756,6 +704,4 @@ const struct format_ops aout_format_ops =
   0,   /* read_begin_hook */
   0    /* symbol_new_hook */
 };
-#endif BFD_ASSEMBLER
-
-/* end of obj-aout.c */
+#endif /* BFD_ASSEMBLER */
This page took 0.028389 seconds and 4 git commands to generate.