* app.c (do_scrub_next_char): Another attempt to fix bugs

[binutils.git] / gdb / paread.c

diff --git a/gdb/paread.c b/gdb/paread.c
index 63993780f2bd682c7221f4052b2beb2372b826b2..7c24fdd80c6902135a623a03ee143d166dd9134c 100644 (file)
--- a/gdb/paread.c
+++ b/gdb/paread.c
@@ -81,7 +81,7 @@ record_minimal_symbol (name, address, ms_type, objfile)
      struct objfile *objfile;
 {
   name = obsavestring (name, strlen (name), &objfile -> symbol_obstack);
-  prim_record_minimal_symbol (name, address, ms_type);
+  prim_record_minimal_symbol (name, address, ms_type, objfile);
 }
 
 /*
@@ -182,11 +182,15 @@ pa_symtab_read (abfd, addr, objfile)
              bufp->symbol_value &= ~0x3; /* clear out permission bits */
 
            check_strange_names:
-             /* GAS leaves symbols with the prefixes "LS$", "LBB$",
-                and "LBE$" in .o files after assembling.  And thus
-                they appear in the final executable.  This can
-                cause problems if these special symbols have the
-                same value as real symbols.  So ignore them.  Also "LC$".  */
+             /* GAS leaves labels in .o files after assembling.  At
+                least labels starting with "LS$", "LBB$", "LBE$",
+                "LC$", and "L$" can happen.  This should be fixed in
+                the assembler and/or compiler, to save space in the
+                executable (and because having GDB make gross
+                distinctions based on the name is kind of ugly), but
+                until then, just ignore them.  ("L$" at least, has something
+                to do with getting relocation correct, so that one might
+                be hard to fix).  */
              if (*symname == 'L'
                  && (symname[1] == '$' || symname[2] == '$' 
                      || symname[3] == '$'))
@@ -408,11 +412,6 @@ pa_symfile_init (objfile)
 
   memset ((PTR) objfile->sym_stab_info, 0, sizeof (struct dbx_symfile_info));
 
-  if (!stabsect)
-    return;
-
-  if (!stringsect)
-    error ("Found stabs, but not string section");
 
   /* FIXME POKING INSIDE BFD DATA STRUCTURES */
 #define        STRING_TABLE_OFFSET     (stringsect->filepos)
@@ -421,10 +420,16 @@ pa_symfile_init (objfile)
   /* FIXME POKING INSIDE BFD DATA STRUCTURES */
 
   DBX_SYMFILE_INFO (objfile)->stab_section_info = NULL;
-  DBX_TEXT_SECT (objfile) = bfd_get_section_by_name (sym_bfd, ".text");
+  DBX_TEXT_SECT (objfile) = bfd_get_section_by_name (sym_bfd, "$TEXT$");
   if (!DBX_TEXT_SECT (objfile))
-    error ("Can't find .text section in symbol file");
+    error ("Can't find $TEXT$ section in symbol file");
 
+  if (!stabsect)
+    return;
+
+  if (!stringsect)
+    error ("Found stabs, but not string section");
+  
   /* FIXME: I suspect this should be external_nlist.  The size of host
      types like long and bfd_vma should not affect how we read the
      file.  */