2004-07-15 Roman Zippel <zippel@linux-m68k.org>

[pf3gnuchains/gcc-fork.git] / gcc / xcoffout.h

diff --git a/gcc/xcoffout.h b/gcc/xcoffout.h
index afa7274..eca245d 100644 (file)
--- a/gcc/xcoffout.h
+++ b/gcc/xcoffout.h
@@ -1,6 +1,7 @@
 /* XCOFF definitions.  These are needed in dbxout.c, final.c,
    and xcoffout.h.
-   Copyright (C) 1998, 2000, 2002 Free Software Foundation, Inc.
+   Copyright (C) 1998, 2000, 2002, 2003, 2004
+   Free Software Foundation, Inc.
 
 This file is part of GCC.
 
@@ -28,15 +29,8 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 
 /* Use the XCOFF predefined type numbers.  */
 
-/* ??? According to metin, typedef stabx must go in text control section,
-   but he did not make this changes everywhere where such typedef stabx
-   can be emitted, so it is really needed or not?  */
-
-#define DBX_OUTPUT_STANDARD_TYPES(SYMS)                \
-{                                              \
-  text_section ();                             \
-  xcoff_output_standard_types (SYMS);          \
-}
+#define DBX_ASSIGN_FUNDAMENTAL_TYPE_NUMBER(TYPE) \
+  xcoff_assign_fundamental_type_number (TYPE)
 
 /* Any type with a negative type index has already been output.  */
 
@@ -47,30 +41,14 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 
 #define DBX_STATIC_CONST_VAR_CODE N_STSYM
 
-/* For static variables, output code to define the start of a static block.
-
-   ??? The IBM rs6000/AIX assembler has a bug that causes bss block debug
-   info to be occasionally lost.  A simple example is this:
-       int a; static int b;
-   The commands `gcc -g -c tmp.c; dump -t tmp.o' gives
-[10]   m   0x00000016         1     0    0x8f  0x0000            .bs
-[11]   m   0x00000000         1     0    0x90  0x0000            .es
-...
-[21]   m   0x00000000        -2     0    0x85  0x0000            b:S-1
-   which is wrong.  The `b:S-1' must be between the `.bs' and `.es'.
-   We can apparently work around the problem by forcing the text section
-   (even if we are already in the text section) immediately before outputting
-   the `.bs'.  This should be fixed in the next major AIX release (3.3?).  */
+/* For static variables, output code to define the start of a static block.  */
 
 #define DBX_STATIC_BLOCK_START(ASMFILE,CODE)                           \
 {                                                                      \
   if ((CODE) == N_STSYM)                                               \
     fprintf ((ASMFILE), "\t.bs\t%s[RW]\n", xcoff_private_data_section_name);\
   else if ((CODE) == N_LCSYM)                                          \
-    {                                                                  \
-      fprintf ((ASMFILE), "%s\n", TEXT_SECTION_ASM_OP);                        \
-      fprintf ((ASMFILE), "\t.bs\t%s\n", xcoff_bss_section_name);      \
-    }                                                                  \
+    fprintf ((ASMFILE), "\t.bs\t%s\n", xcoff_bss_section_name);        \
 }
 
 /* For static variables, output code to define the end of a static block.  */
@@ -113,7 +91,7 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
   else if (current_sym_addr)                                   \
     output_addr_const (asmfile, current_sym_addr);             \
   else if (current_sym_code == N_GSYM)                         \
-    assemble_name (asmfile, XSTR (XEXP (DECL_RTL (sym), 0), 0)); \
+    assemble_name (asmfile, XSTR (XEXP (DECL_RTL (SYM), 0), 0)); \
   else                                                         \
     fprintf (asmfile, "%d", current_sym_value);                        \
   fprintf (asmfile, ",%d,0\n", stab_to_sclass (current_sym_code)); \
@@ -154,8 +132,8 @@ extern const char *xcoff_lastfile;
 
 /* Write out main source file name using ".file" rather than ".stabs".
    We don't actually do this here, because the assembler gets confused if there
-   is more than one .file directive.  ASM_FILE_START in config/rs6000/rs6000.h
-   is already emitting a .file directory, so we don't output one here also.
+   is more than one .file directive.  rs6000_xcoff_file_start is already
+   emitting a .file directory, so we don't output one here also.
    Initialize xcoff_lastfile.  */
 #define DBX_OUTPUT_MAIN_SOURCE_FILENAME(FILE,FILENAME) \
   xcoff_lastfile = (FILENAME)
@@ -197,27 +175,12 @@ extern const char *xcoff_lastfile;
 
 /* Prototype functions in xcoffout.c.  */
 
-extern int stab_to_sclass                      PARAMS ((int));
-#ifdef BUFSIZ
-extern void xcoffout_begin_prologue            PARAMS ((unsigned int,
-                                                        const char *));
-extern void xcoffout_begin_block               PARAMS ((unsigned, unsigned));
-extern void xcoffout_end_epilogue              PARAMS ((unsigned int,
-                                                        const char *));
-extern void xcoffout_end_function              PARAMS ((unsigned int));
-extern void xcoffout_end_block                 PARAMS ((unsigned, unsigned));
-#endif /* BUFSIZ */
-
-#ifdef TREE_CODE
-extern void xcoff_output_standard_types                PARAMS ((tree));
-#ifdef BUFSIZ
-extern void xcoffout_declare_function          PARAMS ((FILE *, tree, const char *));
-#endif /* BUFSIZ */
-#endif /* TREE_CODE */
-
-#ifdef RTX_CODE
-#ifdef BUFSIZ
-extern void xcoffout_source_line               PARAMS ((unsigned int,
-                                                        const char *));
-#endif /* BUFSIZ */
-#endif /* RTX_CODE */
+extern int stab_to_sclass (int);
+extern void xcoffout_begin_prologue (unsigned int, const char *);
+extern void xcoffout_begin_block (unsigned, unsigned);
+extern void xcoffout_end_epilogue (unsigned int, const char *);
+extern void xcoffout_end_function (unsigned int);
+extern void xcoffout_end_block (unsigned, unsigned);
+extern int xcoff_assign_fundamental_type_number (tree);
+extern void xcoffout_declare_function (FILE *, tree, const char *);
+extern void xcoffout_source_line (unsigned int, const char *);