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