?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
* decl.c (cplus_expand_expr_stmt): Don't call break_out_cleanups
[official-gcc.git] / gcc / config / svr4.h
blob378db97fb02992cc952051e46234815ea73a173e
1 /* Operating system specific defines to be used when targeting GCC for some
2 generic System V Release 4 system.
3 Copyright (C) 1991, 94-98, 1999 Free Software Foundation, Inc.
4 Contributed by Ron Guilmette (rfg@monkeys.com).
5
6 This file is part of GNU CC.
7
8 GNU CC is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2, or (at your option)
11 any later version.
12
13 GNU CC is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with GNU CC; see the file COPYING. If not, write to
20 the Free Software Foundation, 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA.
22
23 To use this file, make up a file with a name like:
24
25 ?????svr4.h
26
27 where ????? is replaced by the name of the basic hardware that you
28 are targeting for. Then, in the file ?????svr4.h, put something
29 like:
30
31 #include "?????.h"
32 #include "svr4.h"
33
34 followed by any really system-specific defines (or overrides of
35 defines) which you find that you need. For example, CPP_PREDEFINES
36 is defined here with only the defined -Dunix and -DSVR4. You should
37 probably override that in your target-specific ?????svr4.h file
38 with a set of defines that includes these, but also contains an
39 appropriate define for the type of hardware that you are targeting.
40 */
41
42 /* Define a symbol indicating that we are using svr4.h. */
43 #define USING_SVR4_H
44
45 /* Cpp, assembler, linker, library, and startfile spec's. */
46
47 /* This defines which switch letters take arguments. On svr4, most of
48 the normal cases (defined in gcc.c) apply, and we also have -h* and
49 -z* options (for the linker). Note however that there is no such
50 thing as a -T option for svr4. */
51
52 #define SWITCH_TAKES_ARG(CHAR) \
53 (DEFAULT_SWITCH_TAKES_ARG (CHAR) \
54 || (CHAR) == 'h' \
55 || (CHAR) == 'x' \
56 || (CHAR) == 'z')
57
58 /* This defines which multi-letter switches take arguments. On svr4,
59 there are no such switches except those implemented by GCC itself. */
60
61 #define WORD_SWITCH_TAKES_ARG(STR) \
62 (DEFAULT_WORD_SWITCH_TAKES_ARG (STR) \
63 && strcmp (STR, "Tdata") && strcmp (STR, "Ttext") \
64 && strcmp (STR, "Tbss"))
65
66 /* You should redefine CPP_PREDEFINES in any file which includes this one.
67 The definition should be appropriate for the type of target system
68 involved, and it should include any -A (assertion) options which are
69 appropriate for the given target system. */
70 #undef CPP_PREDEFINES
71
72 /* Provide an ASM_SPEC appropriate for svr4. Here we try to support as
73 many of the specialized svr4 assembler options as seems reasonable,
74 given that there are certain options which we can't (or shouldn't)
75 support directly due to the fact that they conflict with other options
76 for other svr4 tools (e.g. ld) or with other options for GCC itself.
77 For example, we don't support the -o (output file) or -R (remove
78 input file) options because GCC already handles these things. We
79 also don't support the -m (run m4) option for the assembler because
80 that conflicts with the -m (produce load map) option of the svr4
81 linker. We do however allow passing arbitrary options to the svr4
82 assembler via the -Wa, option.
83
84 Note that gcc doesn't allow a space to follow -Y in a -Ym,* or -Yd,*
85 option.
86 */
87
88 #undef ASM_SPEC
89 #define ASM_SPEC \
90 "%{v:-V} %{Qy:} %{!Qn:-Qy} %{n} %{T} %{Ym,*} %{Yd,*} %{Wa,*:%*}"
91
92 /* svr4 assemblers need the `-' (indicating input from stdin) to come after
93 the -o option (and its argument) for some reason. If we try to put it
94 before the -o option, the assembler will try to read the file named as
95 the output file in the -o option as an input file (after it has already
96 written some stuff to it) and the binary stuff contained therein will
97 cause totally confuse the assembler, resulting in many spurious error
98 messages. */
99
100 #undef ASM_FINAL_SPEC
101 #define ASM_FINAL_SPEC "%|"
102
103 /* Under svr4, the normal location of the `ld' and `as' programs is the
104 /usr/ccs/bin directory. */
105
106 #ifndef CROSS_COMPILE
107 #undef MD_EXEC_PREFIX
108 #define MD_EXEC_PREFIX "/usr/ccs/bin/"
109 #endif
110
111 /* Under svr4, the normal location of the various *crt*.o files is the
112 /usr/ccs/lib directory. */
113
114 #ifndef CROSS_COMPILE
115 #undef MD_STARTFILE_PREFIX
116 #define MD_STARTFILE_PREFIX "/usr/ccs/lib/"
117 #endif
118
119 /* Provide a LIB_SPEC appropriate for svr4. Here we tack on the default
120 standard C library (unless we are building a shared library). */
121
122 #undef LIB_SPEC
123 #define LIB_SPEC "%{!shared:%{!symbolic:-lc}}"
124
125 /* Provide an ENDFILE_SPEC appropriate for svr4. Here we tack on our own
126 magical crtend.o file (see crtstuff.c) which provides part of the
127 support for getting C++ file-scope static object constructed before
128 entering `main', followed by the normal svr3/svr4 "finalizer" file,
129 which is either `gcrtn.o' or `crtn.o'. */
130
131 #undef ENDFILE_SPEC
132 #define ENDFILE_SPEC "crtend.o%s %{pg:gcrtn.o%s}%{!pg:crtn.o%s}"
133
134 /* Provide a LINK_SPEC appropriate for svr4. Here we provide support
135 for the special GCC options -static, -shared, and -symbolic which
136 allow us to link things in one of these three modes by applying the
137 appropriate combinations of options at link-time. We also provide
138 support here for as many of the other svr4 linker options as seems
139 reasonable, given that some of them conflict with options for other
140 svr4 tools (e.g. the assembler). In particular, we do support the
141 -z*, -V, -b, -t, -Qy, -Qn, and -YP* options here, and the -e*,
142 -l*, -o*, -r, -s, -u*, and -L* options are directly supported
143 by gcc.c itself. We don't directly support the -m (generate load
144 map) option because that conflicts with the -m (run m4) option of
145 the svr4 assembler. We also don't directly support the svr4 linker's
146 -I* or -M* options because these conflict with existing GCC options.
147 We do however allow passing arbitrary options to the svr4 linker
148 via the -Wl, option. We don't support the svr4 linker's -a option
149 at all because it is totally useless and because it conflicts with
150 GCC's own -a option.
151
152 Note that gcc doesn't allow a space to follow -Y in a -YP,* option.
153
154 When the -G link option is used (-shared and -symbolic) a final link is
155 not being done. */
156
157 #undef LINK_SPEC
158 #ifdef CROSS_COMPILE
159 #define LINK_SPEC "%{h*} %{v:-V} \
160 %{b} %{Wl,*:%*} \
161 %{static:-dn -Bstatic} \
162 %{shared:-G -dy -z text} \
163 %{symbolic:-Bsymbolic -G -dy -z text} \
164 %{G:-G} \
165 %{YP,*} \
166 %{Qy:} %{!Qn:-Qy}"
167 #else
168 #define LINK_SPEC "%{h*} %{v:-V} \
169 %{b} %{Wl,*:%*} \
170 %{static:-dn -Bstatic} \
171 %{shared:-G -dy -z text} \
172 %{symbolic:-Bsymbolic -G -dy -z text} \
173 %{G:-G} \
174 %{YP,*} \
175 %{!YP,*:%{p:-Y P,/usr/ccs/lib/libp:/usr/lib/libp:/usr/ccs/lib:/usr/lib} \
176 %{!p:-Y P,/usr/ccs/lib:/usr/lib}} \
177 %{Qy:} %{!Qn:-Qy}"
178 #endif
179
180 /* Gcc automatically adds in one of the files /usr/ccs/lib/values-Xc.o,
181 /usr/ccs/lib/values-Xa.o, or /usr/ccs/lib/values-Xt.o for each final
182 link step (depending upon the other gcc options selected, such as
183 -traditional and -ansi). These files each contain one (initialized)
184 copy of a special variable called `_lib_version'. Each one of these
185 files has `_lib_version' initialized to a different (enum) value.
186 The SVR4 library routines query the value of `_lib_version' at run
187 to decide how they should behave. Specifically, they decide (based
188 upon the value of `_lib_version') if they will act in a strictly ANSI
189 conforming manner or not.
190 */
191
192 #undef STARTFILE_SPEC
193 #define STARTFILE_SPEC "%{!shared: \
194 %{!symbolic: \
195 %{pg:gcrt1.o%s}%{!pg:%{p:mcrt1.o%s}%{!p:crt1.o%s}}}}\
196 %{pg:gcrti.o%s}%{!pg:crti.o%s} \
197 %{ansi:values-Xc.o%s} \
198 %{!ansi: \
199 %{traditional:values-Xt.o%s} \
200 %{!traditional:values-Xa.o%s}} \
201 crtbegin.o%s"
202
203 /* Attach a special .ident directive to the end of the file to identify
204 the version of GCC which compiled this code. The format of the
205 .ident string is patterned after the ones produced by native svr4
206 C compilers. */
207
208 #define IDENT_ASM_OP ".ident"
209
210 #define ASM_FILE_END(FILE) \
211 do { \
212 if (!flag_no_ident) \
213 fprintf ((FILE), "\t%s\t\"GCC: (GNU) %s\"\n", \
214 IDENT_ASM_OP, version_string); \
215 } while (0)
216
217 /* Allow #sccs in preprocessor. */
218
219 #define SCCS_DIRECTIVE
220
221 /* Output #ident as a .ident. */
222
223 #define ASM_OUTPUT_IDENT(FILE, NAME) \
224 fprintf (FILE, "\t%s\t\"%s\"\n", IDENT_ASM_OP, NAME);
225
226 /* Use periods rather than dollar signs in special g++ assembler names. */
227
228 #define NO_DOLLAR_IN_LABEL
229
230 /* Writing `int' for a bitfield forces int alignment for the structure. */
231
232 #define PCC_BITFIELD_TYPE_MATTERS 1
233
234 /* Implicit library calls should use memcpy, not bcopy, etc. */
235
236 #define TARGET_MEM_FUNCTIONS
237
238 /* Handle #pragma weak and #pragma pack. */
239
240 #define HANDLE_SYSV_PRAGMA
241
242 /* System V Release 4 uses DWARF debugging info. */
243
244 #define DWARF_DEBUGGING_INFO
245
246 /* All ELF targets can support DWARF-2. */
247 #ifndef DWARF2_DEBUGGING_INFO
248 #define DWARF2_DEBUGGING_INFO
249 #endif
250
251 /* The numbers used to denote specific machine registers in the System V
252 Release 4 DWARF debugging information are quite likely to be totally
253 different from the numbers used in BSD stabs debugging information
254 for the same kind of target machine. Thus, we undefine the macro
255 DBX_REGISTER_NUMBER here as an extra inducement to get people to
256 provide proper machine-specific definitions of DBX_REGISTER_NUMBER
257 (which is also used to provide DWARF registers numbers in dwarfout.c)
258 in their tm.h files which include this file. */
259
260 #undef DBX_REGISTER_NUMBER
261
262 /* Use DWARF debugging info by default. */
263
264 #ifndef PREFERRED_DEBUGGING_TYPE
265 #define PREFERRED_DEBUGGING_TYPE DWARF_DEBUG
266 #endif
267
268 /* But allow STABS to be supoorted as well. */
269 #include "dbxelf.h"
270
271 /* Define the actual types of some ANSI-mandated types. (These
272 definitions should work for most SVR4 systems). */
273
274 #undef SIZE_TYPE
275 #define SIZE_TYPE "unsigned int"
276
277 #undef PTRDIFF_TYPE
278 #define PTRDIFF_TYPE "int"
279
280 #undef WCHAR_TYPE
281 #define WCHAR_TYPE "long int"
282
283 #undef WCHAR_TYPE_SIZE
284 #define WCHAR_TYPE_SIZE BITS_PER_WORD
285
286 /* This causes trouble, because it requires the host machine
287 to support ANSI C. */
288 /* #define MULTIBYTE_CHARS */
289
290 #undef ASM_BYTE_OP
291 #define ASM_BYTE_OP ".byte"
292
293 #undef SET_ASM_OP
294 #define SET_ASM_OP ".set"
295
296 /* This is how to begin an assembly language file. Most svr4 assemblers want
297 at least a .file directive to come first, and some want to see a .version
298 directive come right after that. Here we just establish a default
299 which generates only the .file directive. If you need a .version
300 directive for any specific target, you should override this definition
301 in the target-specific file which includes this one. */
302
303 #undef ASM_FILE_START
304 #define ASM_FILE_START(FILE) \
305 output_file_directive ((FILE), main_input_filename)
306
307 /* This is how to allocate empty space in some section. The .zero
308 pseudo-op is used for this on most svr4 assemblers. */
309
310 #define SKIP_ASM_OP ".zero"
311
312 #undef ASM_OUTPUT_SKIP
313 #define ASM_OUTPUT_SKIP(FILE,SIZE) \
314 fprintf (FILE, "\t%s\t%u\n", SKIP_ASM_OP, (SIZE))
315
316 /* The prefix to add to user-visible assembler symbols.
317
318 For System V Release 4 the convention is *not* to prepend a leading
319 underscore onto user-level symbol names. */
320
321 #undef USER_LABEL_PREFIX
322 #define USER_LABEL_PREFIX ""
323
324 /* This is how to output an internal numbered label where
325 PREFIX is the class of label and NUM is the number within the class.
326
327 For most svr4 systems, the convention is that any symbol which begins
328 with a period is not put into the linker symbol table by the assembler. */
329
330 #undef ASM_OUTPUT_INTERNAL_LABEL
331 #define ASM_OUTPUT_INTERNAL_LABEL(FILE, PREFIX, NUM) \
332 do { \
333 fprintf (FILE, ".%s%d:\n", PREFIX, NUM); \
334 } while (0)
335
336 /* This is how to store into the string LABEL
337 the symbol_ref name of an internal numbered label where
338 PREFIX is the class of label and NUM is the number within the class.
339 This is suitable for output with `assemble_name'.
340
341 For most svr4 systems, the convention is that any symbol which begins
342 with a period is not put into the linker symbol table by the assembler. */
343
344 #undef ASM_GENERATE_INTERNAL_LABEL
345 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
346 do { \
347 sprintf (LABEL, "*.%s%d", PREFIX, (unsigned) (NUM)); \
348 } while (0)
349
350 /* Output the label which precedes a jumptable. Note that for all svr4
351 systems where we actually generate jumptables (which is to say every
352 svr4 target except i386, where we use casesi instead) we put the jump-
353 tables into the .rodata section and since other stuff could have been
354 put into the .rodata section prior to any given jumptable, we have to
355 make sure that the location counter for the .rodata section gets pro-
356 perly re-aligned prior to the actual beginning of the jump table. */
357
358 #define ALIGN_ASM_OP ".align"
359
360 #ifndef ASM_OUTPUT_BEFORE_CASE_LABEL
361 #define ASM_OUTPUT_BEFORE_CASE_LABEL(FILE,PREFIX,NUM,TABLE) \
362 ASM_OUTPUT_ALIGN ((FILE), 2);
363 #endif
364
365 #undef ASM_OUTPUT_CASE_LABEL
366 #define ASM_OUTPUT_CASE_LABEL(FILE,PREFIX,NUM,JUMPTABLE) \
367 do { \
368 ASM_OUTPUT_BEFORE_CASE_LABEL (FILE, PREFIX, NUM, JUMPTABLE) \
369 ASM_OUTPUT_INTERNAL_LABEL (FILE, PREFIX, NUM); \
370 } while (0)
371
372 /* The standard SVR4 assembler seems to require that certain builtin
373 library routines (e.g. .udiv) be explicitly declared as .globl
374 in each assembly file where they are referenced. */
375
376 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN) \
377 ASM_GLOBALIZE_LABEL (FILE, XSTR (FUN, 0))
378
379 /* This says how to output assembler code to declare an
380 uninitialized external linkage data object. Under SVR4,
381 the linker seems to want the alignment of data objects
382 to depend on their types. We do exactly that here. */
383
384 #define COMMON_ASM_OP ".comm"
385
386 #undef ASM_OUTPUT_ALIGNED_COMMON
387 #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN) \
388 do { \
389 fprintf ((FILE), "\t%s\t", COMMON_ASM_OP); \
390 assemble_name ((FILE), (NAME)); \
391 fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT); \
392 } while (0)
393
394 /* This says how to output assembler code to declare an
395 uninitialized internal linkage data object. Under SVR4,
396 the linker seems to want the alignment of data objects
397 to depend on their types. We do exactly that here. */
398
399 #define LOCAL_ASM_OP ".local"
400
401 #undef ASM_OUTPUT_ALIGNED_LOCAL
402 #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN) \
403 do { \
404 fprintf ((FILE), "\t%s\t", LOCAL_ASM_OP); \
405 assemble_name ((FILE), (NAME)); \
406 fprintf ((FILE), "\n"); \
407 ASM_OUTPUT_ALIGNED_COMMON (FILE, NAME, SIZE, ALIGN); \
408 } while (0)
409
410 /* Biggest alignment supported by the object file format of this
411 machine. Use this macro to limit the alignment which can be
412 specified using the `__attribute__ ((aligned (N)))' construct. If
413 not defined, the default value is `BIGGEST_ALIGNMENT'. */
414
415 #define MAX_OFILE_ALIGNMENT (32768*8)
416
417 /* This is the pseudo-op used to generate a 32-bit word of data with a
418 specific value in some section. This is the same for all known svr4
419 assemblers. */
420
421 #define INT_ASM_OP ".long"
422
423 /* This is the pseudo-op used to generate a contiguous sequence of byte
424 values from a double-quoted string WITHOUT HAVING A TERMINATING NUL
425 AUTOMATICALLY APPENDED. This is the same for most svr4 assemblers. */
426
427 #undef ASCII_DATA_ASM_OP
428 #define ASCII_DATA_ASM_OP ".ascii"
429
430 /* Support const sections and the ctors and dtors sections for g++.
431 Note that there appears to be two different ways to support const
432 sections at the moment. You can either #define the symbol
433 READONLY_DATA_SECTION (giving it some code which switches to the
434 readonly data section) or else you can #define the symbols
435 EXTRA_SECTIONS, EXTRA_SECTION_FUNCTIONS, SELECT_SECTION, and
436 SELECT_RTX_SECTION. We do both here just to be on the safe side. */
437
438 #define USE_CONST_SECTION 1
439
440 #define CONST_SECTION_ASM_OP "\t.section\t.rodata"
441
442 /* Define the pseudo-ops used to switch to the .ctors and .dtors sections.
443
444 Note that we want to give these sections the SHF_WRITE attribute
445 because these sections will actually contain data (i.e. tables of
446 addresses of functions in the current root executable or shared library
447 file) and, in the case of a shared library, the relocatable addresses
448 will have to be properly resolved/relocated (and then written into) by
449 the dynamic linker when it actually attaches the given shared library
450 to the executing process. (Note that on SVR4, you may wish to use the
451 `-z text' option to the ELF linker, when building a shared library, as
452 an additional check that you are doing everything right. But if you do
453 use the `-z text' option when building a shared library, you will get
454 errors unless the .ctors and .dtors sections are marked as writable
455 via the SHF_WRITE attribute.) */
456
457 #define CTORS_SECTION_ASM_OP "\t.section\t.ctors,\"aw\""
458 #define DTORS_SECTION_ASM_OP "\t.section\t.dtors,\"aw\""
459
460 /* On svr4, we *do* have support for the .init and .fini sections, and we
461 can put stuff in there to be executed before and after `main'. We let
462 crtstuff.c and other files know this by defining the following symbols.
463 The definitions say how to change sections to the .init and .fini
464 sections. This is the same for all known svr4 assemblers. */
465
466 #define INIT_SECTION_ASM_OP "\t.section\t.init"
467 #define FINI_SECTION_ASM_OP "\t.section\t.fini"
468
469 /* A default list of other sections which we might be "in" at any given
470 time. For targets that use additional sections (e.g. .tdesc) you
471 should override this definition in the target-specific file which
472 includes this file. */
473
474 #undef EXTRA_SECTIONS
475 #define EXTRA_SECTIONS in_const, in_ctors, in_dtors
476
477 /* A default list of extra section function definitions. For targets
478 that use additional sections (e.g. .tdesc) you should override this
479 definition in the target-specific file which includes this file. */
480
481 #undef EXTRA_SECTION_FUNCTIONS
482 #define EXTRA_SECTION_FUNCTIONS \
483 CONST_SECTION_FUNCTION \
484 CTORS_SECTION_FUNCTION \
485 DTORS_SECTION_FUNCTION
486
487 #define READONLY_DATA_SECTION() const_section ()
488
489 #define CONST_SECTION_FUNCTION \
490 void \
491 const_section () \
492 { \
493 if (!USE_CONST_SECTION) \
494 text_section(); \
495 else if (in_section != in_const) \
496 { \
497 fprintf (asm_out_file, "%s\n", CONST_SECTION_ASM_OP); \
498 in_section = in_const; \
499 } \
500 }
501
502 #define CTORS_SECTION_FUNCTION \
503 void \
504 ctors_section () \
505 { \
506 if (in_section != in_ctors) \
507 { \
508 fprintf (asm_out_file, "%s\n", CTORS_SECTION_ASM_OP); \
509 in_section = in_ctors; \
510 } \
511 }
512
513 #define DTORS_SECTION_FUNCTION \
514 void \
515 dtors_section () \
516 { \
517 if (in_section != in_dtors) \
518 { \
519 fprintf (asm_out_file, "%s\n", DTORS_SECTION_ASM_OP); \
520 in_section = in_dtors; \
521 } \
522 }
523
524 /* Switch into a generic section.
525
526 We make the section read-only and executable for a function decl,
527 read-only for a const data decl, and writable for a non-const data decl.
528
529 If the section has already been defined, we must not
530 emit the attributes here. The SVR4 assembler does not
531 recognize section redefinitions.
532 If DECL is NULL, no attributes are emitted. */
533
534 #define ASM_OUTPUT_SECTION_NAME(FILE, DECL, NAME, RELOC) \
535 do { \
536 static struct section_info \
537 { \
538 struct section_info *next; \
539 char *name; \
540 enum sect_enum {SECT_RW, SECT_RO, SECT_EXEC} type; \
541 } *sections; \
542 struct section_info *s; \
543 const char *mode; \
544 enum sect_enum type; \
545 \
546 for (s = sections; s; s = s->next) \
547 if (!strcmp (NAME, s->name)) \
548 break; \
549 \
550 if (DECL && TREE_CODE (DECL) == FUNCTION_DECL) \
551 type = SECT_EXEC, mode = "ax"; \
552 else if (DECL && DECL_READONLY_SECTION (DECL, RELOC)) \
553 type = SECT_RO, mode = "a"; \
554 else \
555 type = SECT_RW, mode = "aw"; \
556 \
557 if (s == 0) \
558 { \
559 s = (struct section_info *) xmalloc (sizeof (struct section_info)); \
560 s->name = xmalloc ((strlen (NAME) + 1) * sizeof (*NAME)); \
561 strcpy (s->name, NAME); \
562 s->type = type; \
563 s->next = sections; \
564 sections = s; \
565 fprintf (FILE, "\t.section\t%s,\"%s\",@progbits\n", NAME, mode); \
566 } \
567 else \
568 { \
569 if (DECL && s->type != type) \
570 error_with_decl (DECL, "%s causes a section type conflict"); \
571 \
572 fprintf (FILE, "\t.section\t%s\n", NAME); \
573 } \
574 } while (0)
575
576 #define MAKE_DECL_ONE_ONLY(DECL) (DECL_WEAK (DECL) = 1)
577 #define UNIQUE_SECTION_P(DECL) (DECL_ONE_ONLY (DECL))
578 #define UNIQUE_SECTION(DECL,RELOC) \
579 do { \
580 int len; \
581 const char *name, *prefix; \
582 char *string; \
583 \
584 name = IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (DECL)); \
585 \
586 if (! DECL_ONE_ONLY (DECL)) \
587 { \
588 prefix = "."; \
589 if (TREE_CODE (DECL) == FUNCTION_DECL) \
590 prefix = ".text."; \
591 else if (DECL_READONLY_SECTION (DECL, RELOC)) \
592 prefix = ".rodata."; \
593 else \
594 prefix = ".data."; \
595 } \
596 else if (TREE_CODE (DECL) == FUNCTION_DECL) \
597 prefix = ".gnu.linkonce.t."; \
598 else if (DECL_READONLY_SECTION (DECL, RELOC)) \
599 prefix = ".gnu.linkonce.r."; \
600 else \
601 prefix = ".gnu.linkonce.d."; \
602 \
603 len = strlen (name) + strlen (prefix); \
604 string = alloca (len + 1); \
605 sprintf (string, "%s%s", prefix, name); \
606 \
607 DECL_SECTION_NAME (DECL) = build_string (len, string); \
608 } while (0)
609 /* A C statement (sans semicolon) to output an element in the table of
610 global constructors. */
611 #define ASM_OUTPUT_CONSTRUCTOR(FILE,NAME) \
612 do { \
613 ctors_section (); \
614 fprintf (FILE, "\t%s\t ", INT_ASM_OP); \
615 assemble_name (FILE, NAME); \
616 fprintf (FILE, "\n"); \
617 } while (0)
618
619 /* A C statement (sans semicolon) to output an element in the table of
620 global destructors. */
621 #define ASM_OUTPUT_DESTRUCTOR(FILE,NAME) \
622 do { \
623 dtors_section (); \
624 fprintf (FILE, "\t%s\t ", INT_ASM_OP); \
625 assemble_name (FILE, NAME); \
626 fprintf (FILE, "\n"); \
627 } while (0)
628
629 /* A C statement or statements to switch to the appropriate
630 section for output of DECL. DECL is either a `VAR_DECL' node
631 or a constant of some sort. RELOC indicates whether forming
632 the initial value of DECL requires link-time relocations. */
633
634 #define SELECT_SECTION(DECL,RELOC) \
635 { \
636 if (flag_pic && RELOC) \
637 data_section (); \
638 else if (TREE_CODE (DECL) == STRING_CST) \
639 { \
640 if (! flag_writable_strings) \
641 const_section (); \
642 else \
643 data_section (); \
644 } \
645 else if (TREE_CODE (DECL) == VAR_DECL) \
646 { \
647 if (! DECL_READONLY_SECTION (DECL, RELOC)) \
648 data_section (); \
649 else \
650 const_section (); \
651 } \
652 else \
653 const_section (); \
654 }
655
656 /* A C statement or statements to switch to the appropriate
657 section for output of RTX in mode MODE. RTX is some kind
658 of constant in RTL. The argument MODE is redundant except
659 in the case of a `const_int' rtx. Currently, these always
660 go into the const section. */
661
662 #undef SELECT_RTX_SECTION
663 #define SELECT_RTX_SECTION(MODE,RTX) const_section()
664
665 /* Define the strings used for the special svr4 .type and .size directives.
666 These strings generally do not vary from one system running svr4 to
667 another, but if a given system (e.g. m88k running svr) needs to use
668 different pseudo-op names for these, they may be overridden in the
669 file which includes this one. */
670
671 #define TYPE_ASM_OP ".type"
672 #define SIZE_ASM_OP ".size"
673
674 /* This is how we tell the assembler that a symbol is weak. */
675
676 #define ASM_WEAKEN_LABEL(FILE,NAME) \
677 do { fputs ("\t.weak\t", FILE); assemble_name (FILE, NAME); \
678 fputc ('\n', FILE); } while (0)
679
680 /* The following macro defines the format used to output the second
681 operand of the .type assembler directive. Different svr4 assemblers
682 expect various different forms for this operand. The one given here
683 is just a default. You may need to override it in your machine-
684 specific tm.h file (depending upon the particulars of your assembler). */
685
686 #define TYPE_OPERAND_FMT "@%s"
687
688 /* Write the extra assembler code needed to declare a function's result.
689 Most svr4 assemblers don't require any special declaration of the
690 result value, but there are exceptions. */
691
692 #ifndef ASM_DECLARE_RESULT
693 #define ASM_DECLARE_RESULT(FILE, RESULT)
694 #endif
695
696 /* These macros generate the special .type and .size directives which
697 are used to set the corresponding fields of the linker symbol table
698 entries in an ELF object file under SVR4. These macros also output
699 the starting labels for the relevant functions/objects. */
700
701 /* Write the extra assembler code needed to declare a function properly.
702 Some svr4 assemblers need to also have something extra said about the
703 function's return value. We allow for that here. */
704
705 #ifndef ASM_DECLARE_FUNCTION_NAME
706 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \
707 do { \
708 fprintf (FILE, "\t%s\t ", TYPE_ASM_OP); \
709 assemble_name (FILE, NAME); \
710 putc (',', FILE); \
711 fprintf (FILE, TYPE_OPERAND_FMT, "function"); \
712 putc ('\n', FILE); \
713 ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL)); \
714 ASM_OUTPUT_LABEL(FILE, NAME); \
715 } while (0)
716 #endif
717
718 /* Write the extra assembler code needed to declare an object properly. */
719
720 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL) \
721 do { \
722 fprintf (FILE, "\t%s\t ", TYPE_ASM_OP); \
723 assemble_name (FILE, NAME); \
724 putc (',', FILE); \
725 fprintf (FILE, TYPE_OPERAND_FMT, "object"); \
726 putc ('\n', FILE); \
727 size_directive_output = 0; \
728 if (!flag_inhibit_size_directive && DECL_SIZE (DECL)) \
729 { \
730 size_directive_output = 1; \
731 fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \
732 assemble_name (FILE, NAME); \
733 putc (',', FILE); \
734 fprintf (FILE, HOST_WIDE_INT_PRINT_DEC, \
735 int_size_in_bytes (TREE_TYPE (DECL))); \
736 fputc ('\n', FILE); \
737 } \
738 ASM_OUTPUT_LABEL(FILE, NAME); \
739 } while (0)
740
741 /* Output the size directive for a decl in rest_of_decl_compilation
742 in the case where we did not do so before the initializer.
743 Once we find the error_mark_node, we know that the value of
744 size_directive_output was set
745 by ASM_DECLARE_OBJECT_NAME when it was run for the same decl. */
746
747 #define ASM_FINISH_DECLARE_OBJECT(FILE, DECL, TOP_LEVEL, AT_END) \
748 do { \
749 const char *name = XSTR (XEXP (DECL_RTL (DECL), 0), 0); \
750 if (!flag_inhibit_size_directive && DECL_SIZE (DECL) \
751 && ! AT_END && TOP_LEVEL \
752 && DECL_INITIAL (DECL) == error_mark_node \
753 && !size_directive_output) \
754 { \
755 size_directive_output = 1; \
756 fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \
757 assemble_name (FILE, name); \
758 putc (',', FILE); \
759 fprintf (FILE, HOST_WIDE_INT_PRINT_DEC, \
760 int_size_in_bytes (TREE_TYPE (DECL))); \
761 fputc ('\n', FILE); \
762 } \
763 } while (0)
764
765 /* This is how to declare the size of a function. */
766 #ifndef ASM_DECLARE_FUNCTION_SIZE
767 #define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL) \
768 do { \
769 if (!flag_inhibit_size_directive) \
770 { \
771 char label[256]; \
772 static int labelno; \
773 labelno++; \
774 ASM_GENERATE_INTERNAL_LABEL (label, "Lfe", labelno); \
775 ASM_OUTPUT_INTERNAL_LABEL (FILE, "Lfe", labelno); \
776 fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \
777 assemble_name (FILE, (FNAME)); \
778 fprintf (FILE, ","); \
779 assemble_name (FILE, label); \
780 fprintf (FILE, "-"); \
781 assemble_name (FILE, (FNAME)); \
782 putc ('\n', FILE); \
783 } \
784 } while (0)
785 #endif
786 /* A table of bytes codes used by the ASM_OUTPUT_ASCII and
787 ASM_OUTPUT_LIMITED_STRING macros. Each byte in the table
788 corresponds to a particular byte value [0..255]. For any
789 given byte value, if the value in the corresponding table
790 position is zero, the given character can be output directly.
791 If the table value is 1, the byte must be output as a \ooo
792 octal escape. If the tables value is anything else, then the
793 byte value should be output as a \ followed by the value
794 in the table. Note that we can use standard UN*X escape
795 sequences for many control characters, but we don't use
796 \a to represent BEL because some svr4 assemblers (e.g. on
797 the i386) don't know about that. Also, we don't use \v
798 since some versions of gas, such as 2.2 did not accept it. */
799
800 #define ESCAPES \
801 "\1\1\1\1\1\1\1\1btn\1fr\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
802 \0\0\"\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\
803 \0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\\\0\0\0\
804 \0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\
805 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
806 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
807 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
808 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1"
809
810 /* Some svr4 assemblers have a limit on the number of characters which
811 can appear in the operand of a .string directive. If your assembler
812 has such a limitation, you should define STRING_LIMIT to reflect that
813 limit. Note that at least some svr4 assemblers have a limit on the
814 actual number of bytes in the double-quoted string, and that they
815 count each character in an escape sequence as one byte. Thus, an
816 escape sequence like \377 would count as four bytes.
817
818 If your target assembler doesn't support the .string directive, you
819 should define this to zero.
820 */
821
822 #define STRING_LIMIT ((unsigned) 256)
823
824 #define STRING_ASM_OP ".string"
825
826 /* The routine used to output NUL terminated strings. We use a special
827 version of this for most svr4 targets because doing so makes the
828 generated assembly code more compact (and thus faster to assemble)
829 as well as more readable, especially for targets like the i386
830 (where the only alternative is to output character sequences as
831 comma separated lists of numbers). */
832
833 #define ASM_OUTPUT_LIMITED_STRING(FILE, STR) \
834 do \
835 { \
836 register const unsigned char *_limited_str = \
837 (const unsigned char *) (STR); \
838 register unsigned ch; \
839 fprintf ((FILE), "\t%s\t\"", STRING_ASM_OP); \
840 for (; (ch = *_limited_str); _limited_str++) \
841 { \
842 register int escape; \
843 switch (escape = ESCAPES[ch]) \
844 { \
845 case 0: \
846 putc (ch, (FILE)); \
847 break; \
848 case 1: \
849 fprintf ((FILE), "\\%03o", ch); \
850 break; \
851 default: \
852 putc ('\\', (FILE)); \
853 putc (escape, (FILE)); \
854 break; \
855 } \
856 } \
857 fprintf ((FILE), "\"\n"); \
858 } \
859 while (0)
860
861 /* The routine used to output sequences of byte values. We use a special
862 version of this for most svr4 targets because doing so makes the
863 generated assembly code more compact (and thus faster to assemble)
864 as well as more readable. Note that if we find subparts of the
865 character sequence which end with NUL (and which are shorter than
866 STRING_LIMIT) we output those using ASM_OUTPUT_LIMITED_STRING. */
867
868 #undef ASM_OUTPUT_ASCII
869 #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH) \
870 do \
871 { \
872 register const unsigned char *_ascii_bytes = \
873 (const unsigned char *) (STR); \
874 register const unsigned char *limit = _ascii_bytes + (LENGTH); \
875 register unsigned bytes_in_chunk = 0; \
876 for (; _ascii_bytes < limit; _ascii_bytes++) \
877 { \
878 register const unsigned char *p; \
879 if (bytes_in_chunk >= 60) \
880 { \
881 fprintf ((FILE), "\"\n"); \
882 bytes_in_chunk = 0; \
883 } \
884 for (p = _ascii_bytes; p < limit && *p != '\0'; p++) \
885 continue; \
886 if (p < limit && (p - _ascii_bytes) <= (long)STRING_LIMIT) \
887 { \
888 if (bytes_in_chunk > 0) \
889 { \
890 fprintf ((FILE), "\"\n"); \
891 bytes_in_chunk = 0; \
892 } \
893 ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes); \
894 _ascii_bytes = p; \
895 } \
896 else \
897 { \
898 register int escape; \
899 register unsigned ch; \
900 if (bytes_in_chunk == 0) \
901 fprintf ((FILE), "\t%s\t\"", ASCII_DATA_ASM_OP); \
902 switch (escape = ESCAPES[ch = *_ascii_bytes]) \
903 { \
904 case 0: \
905 putc (ch, (FILE)); \
906 bytes_in_chunk++; \
907 break; \
908 case 1: \
909 fprintf ((FILE), "\\%03o", ch); \
910 bytes_in_chunk += 4; \
911 break; \
912 default: \
913 putc ('\\', (FILE)); \
914 putc (escape, (FILE)); \
915 bytes_in_chunk += 2; \
916 break; \
917 } \
918 } \
919 } \
920 if (bytes_in_chunk > 0) \
921 fprintf ((FILE), "\"\n"); \
922 } \
923 while (0)
924
925 /* All SVR4 targets use the ELF object file format. */
926 #define OBJECT_FORMAT_ELF
Mirror of the offical gcc git repository hosted at gcc.gnu.org