gcc/xcoffout.h

   1 /* XCOFF definitions.  These are needed in dbxout.c, final.c,
   2    and xcoffout.h.  */
   3
   4 #define ASM_STABS_OP ".stabx"
   5
   6 /* Tags and typedefs are C_DECL in XCOFF, not C_LSYM.  */
   7
   8 #define DBX_TYPE_DECL_STABS_CODE N_DECL
   9
  10 /* Use the XCOFF predefined type numbers.  */
  11
  12 /* ??? According to metin, typedef stabx must go in text control section,
  13    but he did not make this changes everywhere where such typedef stabx
  14    can be emitted, so it is really needed or not?  */
  15
  16 #define DBX_OUTPUT_STANDARD_TYPES(SYMS)         \
  17 {                                               \
  18   text_section ();                              \
  19   xcoff_output_standard_types (SYMS);           \
  20 }
  21
  22 /* Any type with a negative type index has already been output.  */
  23
  24 #define DBX_TYPE_DEFINED(TYPE) (TYPE_SYMTAB_ADDRESS (TYPE) < 0)
  25
  26 /* Must use N_STSYM for static const variables (those in the text section)
  27    instead of N_FUN.  */
  28
  29 #define DBX_STATIC_CONST_VAR_CODE N_STSYM
  30
  31 /* For static variables, output code to define the start of a static block.
  32
  33    ??? The IBM rs6000/AIX assembler has a bug that causes bss block debug
  34    info to be occasionally lost.  A simple example is this:
  35         int a; static int b;
  36    The commands `gcc -g -c tmp.c; dump -t tmp.o' gives
  37 [10]    m   0x00000016         1     0    0x8f  0x0000            .bs
  38 [11]    m   0x00000000         1     0    0x90  0x0000            .es
  39 ...
  40 [21]    m   0x00000000        -2     0    0x85  0x0000            b:S-1
  41    which is wrong.  The `b:S-1' must be between the `.bs' and `.es'.
  42    We can apparently work around the problem by forcing the text section
  43    (even if we are already in the text section) immediately before outputting
  44    the `.bs'.  This should be fixed in the next major AIX release (3.3?).  */
  45
  46 #define DBX_STATIC_BLOCK_START(ASMFILE,CODE)                            \
  47 {                                                                       \
  48   if ((CODE) == N_STSYM)                                                \
  49     fprintf ((ASMFILE), "\t.bs\t%s[RW]\n", xcoff_private_data_section_name);\
  50   else if ((CODE) == N_LCSYM)                                           \
  51     {                                                                   \
  52       fprintf ((ASMFILE), "%s\n", TEXT_SECTION_ASM_OP);                 \
  53       fprintf ((ASMFILE), "\t.bs\t%s\n", xcoff_bss_section_name);       \
  54     }                                                                   \
  55 }
  56
  57 /* For static variables, output code to define the end of a static block.  */
  58
  59 #define DBX_STATIC_BLOCK_END(ASMFILE,CODE)                              \
  60 {                                                                       \
  61   if (current_sym_code == N_STSYM || current_sym_code == N_LCSYM)       \
  62     fprintf (asmfile, "\t.es\n");                                       \
  63 }
  64
  65 /* We must use N_RPYSM instead of N_RSYM for register parameters.  */
  66
  67 #define DBX_REGPARM_STABS_CODE N_RPSYM
  68
  69 /* We must use 'R' instead of 'P' for register parameters.  */
  70
  71 #define DBX_REGPARM_STABS_LETTER 'R'
  72
  73 /* Define our own finish symbol function, since xcoff stabs have their
  74    own different format.  */
  75
  76 #define DBX_FINISH_SYMBOL(SYM)                                  \
  77 {                                                               \
  78   if (current_sym_addr && current_sym_code == N_FUN)            \
  79     fprintf (asmfile, "\",.");                                  \
  80   else                                                          \
  81     fprintf (asmfile, "\",");                                   \
  82   /* If we are writing a function name, we must ensure that     \
  83      there is no storage-class suffix on the name.  */          \
  84   if (current_sym_addr && current_sym_code == N_FUN             \
  85       && GET_CODE (current_sym_addr) == SYMBOL_REF)             \
  86     {                                                           \
  87       char *_p;                                                 \
  88       for (_p = XSTR (current_sym_addr, 0); *_p != '[' && *_p; _p++) \
  89         fprintf (asmfile, "%c", *_p);                           \
  90     }                                                           \
  91   else if (current_sym_addr)                                    \
  92     output_addr_const (asmfile, current_sym_addr);              \
  93   else if (current_sym_code == N_GSYM)                          \
  94     assemble_name (asmfile, XSTR (XEXP (DECL_RTL (sym), 0), 0)); \
  95   else                                                          \
  96     fprintf (asmfile, "%d", current_sym_value);                 \
  97   fprintf (asmfile, ",%d,0\n", stab_to_sclass (current_sym_code)); \
  98 }
  99
 100 /* These are IBM XCOFF extensions we need to reference in dbxout.c
 101    and xcoffout.c.  */
 102
 103 /* AIX XCOFF uses this for typedefs.  This can have any value, since it is
 104    only used for translation into a C_DECL storage class.  */
 105 #ifndef N_DECL
 106 #define N_DECL 0x8c
 107 #endif
 108 /* AIX XCOFF uses this for parameters passed in registers.  This can have
 109    any value, since it is only used for translation into a C_RPSYM storage
 110    class.  */
 111 #ifndef N_RPSYM
 112 #define N_RPSYM 0x8e
 113 #endif
 114
 115 /* The line number of the beginning of the current function.
 116    xcoffout.c needs this so that it can output relative linenumbers.  */
 117
 118 extern int xcoff_begin_function_line;
 119
 120 /* Name of the current include file.  */
 121
 122 extern char *xcoff_current_include_file;
 123
 124 /* Name of the current function file.  This is the file the `.bf' is
 125    emitted from.  In case a line is emitted from a different file,
 126    (by including that file of course), then the line number will be
 127    absolute.  */
 128
 129 extern char *xcoff_current_function_file;
 130
 131 /* Names of bss and data sections.  These should be unique names for each
 132    compilation unit.  */
 133
 134 extern char *xcoff_bss_section_name;
 135 extern char *xcoff_private_data_section_name;
 136 extern char *xcoff_read_only_section_name;
 137
 138 /* Last source file name mentioned in a NOTE insn.  */
 139
 140 extern char *xcoff_lastfile;
 141
 142 /* Don't write out path name for main source file.  */
 143 #define DBX_OUTPUT_MAIN_SOURCE_DIRECTORY(FILE,FILENAME)
 144
 145 /* Write out main source file name using ".file" rather than ".stabs".
 146    We don't actually do this here, because the assembler gets confused if there
 147    is more than one .file directive.  ASM_FILE_START in config/rs6000/rs6000.h
 148    is already emitting a .file directory, so we don't output one here also.
 149    Initialize xcoff_lastfile.  */
 150 #define DBX_OUTPUT_MAIN_SOURCE_FILENAME(FILE,FILENAME) \
 151   xcoff_lastfile = input_file_name
 152
 153 /* If we are still in an include file, its end must be marked.  */
 154 #define DBX_OUTPUT_MAIN_SOURCE_FILE_END(FILE, FILENAME) \
 155 {                                                       \
 156   if (xcoff_current_include_file)                       \
 157     {                                                   \
 158       fprintf (FILE, "\t.ei\t");                        \
 159       output_quoted_string (FILE, xcoff_current_include_file);  \
 160       fprintf (FILE, "\n");                             \
 161       xcoff_current_include_file = NULL;                \
 162     }                                                   \
 163 }
 164
 165 /* Do not break .stabs pseudos into continuations.  */
 166 #define DBX_CONTIN_LENGTH 0
 167
 168 /* Don't try to use the `x' type-cross-reference character in DBX data.
 169    Also has the consequence of putting each struct, union or enum
 170    into a separate .stabs, containing only cross-refs to the others.  */
 171 #define DBX_NO_XREFS
 172
 173 /* We must put stabs in the text section.  If we don't the assembler
 174    won't handle them correctly; it will sometimes put stabs where gdb
 175    can't find them.  */
 176
 177 #define DEBUG_SYMS_TEXT