![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to xcoffout.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [GCC 2.x] / gcc|
Return to xcoffout.h CVS log | Up to [GCC 2.x] / gcc |
1.1 root 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:
1.1.1.2 root 8: #define DBX_TYPE_DECL_STABS_CODE N_DECL
1.1 root 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:
1.1.1.4 root 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?). */
1.1 root 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) \
1.1.1.4 root 51: { \
52: fprintf ((ASMFILE), "%s\n", TEXT_SECTION_ASM_OP); \
53: fprintf ((ASMFILE), "\t.bs\t%s\n", xcoff_bss_section_name); \
54: } \
1.1 root 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: { \
1.1.1.6 ! root 87: char *_p = XSTR (current_sym_addr, 0); \
! 88: if (*_p == '*') \
! 89: fprintf (asmfile, "%s", _p+1); \
! 90: else \
! 91: for (; *_p != '[' && *_p; _p++) \
! 92: fprintf (asmfile, "%c", *_p); \
1.1 root 93: } \
94: else if (current_sym_addr) \
95: output_addr_const (asmfile, current_sym_addr); \
96: else if (current_sym_code == N_GSYM) \
1.1.1.5 root 97: assemble_name (asmfile, XSTR (XEXP (DECL_RTL (sym), 0), 0)); \
1.1 root 98: else \
99: fprintf (asmfile, "%d", current_sym_value); \
100: fprintf (asmfile, ",%d,0\n", stab_to_sclass (current_sym_code)); \
101: }
102:
103: /* These are IBM XCOFF extensions we need to reference in dbxout.c
104: and xcoffout.c. */
105:
106: /* AIX XCOFF uses this for typedefs. This can have any value, since it is
107: only used for translation into a C_DECL storage class. */
108: #ifndef N_DECL
109: #define N_DECL 0x8c
110: #endif
111: /* AIX XCOFF uses this for parameters passed in registers. This can have
112: any value, since it is only used for translation into a C_RPSYM storage
113: class. */
114: #ifndef N_RPSYM
115: #define N_RPSYM 0x8e
116: #endif
117:
118: /* The line number of the beginning of the current function.
119: xcoffout.c needs this so that it can output relative linenumbers. */
120:
121: extern int xcoff_begin_function_line;
122:
123: /* Name of the current include file. */
124:
125: extern char *xcoff_current_include_file;
126:
127: /* Name of the current function file. This is the file the `.bf' is
128: emitted from. In case a line is emitted from a different file,
129: (by including that file of course), then the line number will be
130: absolute. */
131:
132: extern char *xcoff_current_function_file;
133:
134: /* Names of bss and data sections. These should be unique names for each
135: compilation unit. */
136:
137: extern char *xcoff_bss_section_name;
138: extern char *xcoff_private_data_section_name;
139: extern char *xcoff_read_only_section_name;
140:
1.1.1.5 root 141: /* Last source file name mentioned in a NOTE insn. */
142:
143: extern char *xcoff_lastfile;
144:
1.1 root 145: /* Don't write out path name for main source file. */
146: #define DBX_OUTPUT_MAIN_SOURCE_DIRECTORY(FILE,FILENAME)
147:
1.1.1.5 root 148: /* Write out main source file name using ".file" rather than ".stabs".
149: We don't actually do this here, because the assembler gets confused if there
150: is more than one .file directive. ASM_FILE_START in config/rs6000/rs6000.h
1.1.1.6 ! root 151: is already emitting a .file directory, so we don't output one here also.
1.1.1.5 root 152: Initialize xcoff_lastfile. */
1.1 root 153: #define DBX_OUTPUT_MAIN_SOURCE_FILENAME(FILE,FILENAME) \
1.1.1.5 root 154: xcoff_lastfile = input_file_name
1.1 root 155:
156: /* If we are still in an include file, its end must be marked. */
157: #define DBX_OUTPUT_MAIN_SOURCE_FILE_END(FILE, FILENAME) \
158: { \
159: if (xcoff_current_include_file) \
160: { \
1.1.1.4 root 161: fprintf (FILE, "\t.ei\t"); \
162: output_quoted_string (FILE, xcoff_current_include_file); \
163: fprintf (FILE, "\n"); \
1.1 root 164: xcoff_current_include_file = NULL; \
165: } \
166: }
167:
168: /* Do not break .stabs pseudos into continuations. */
169: #define DBX_CONTIN_LENGTH 0
170:
171: /* Don't try to use the `x' type-cross-reference character in DBX data.
172: Also has the consequence of putting each struct, union or enum
173: into a separate .stabs, containing only cross-refs to the others. */
174: #define DBX_NO_XREFS
1.1.1.3 root 175:
176: /* We must put stabs in the text section. If we don't the assembler
177: won't handle them correctly; it will sometimes put stabs where gdb
178: can't find them. */
179:
180: #define DEBUG_SYMS_TEXT
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.