Define ASM_OUTPUT_SECTION_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 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) followed by
126 our own magical crtend.o file (see crtstuff.c) which provides part of
127 the 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 LIB_SPEC
132 #define LIB_SPEC \
133 "%{!shared:%{!symbolic:-lc}} \
134 crtend.o%s \
135 %{!shared:%{!symbolic:%{pg:gcrtn.o}%{!pg:crtn.o%s}}}"
136
137 /* Provide a LINK_SPEC appropriate for svr4. Here we provide support
138 for the special GCC options -static, -shared, and -symbolic which
139 allow us to link things in one of these three modes by applying the
140 appropriate combinations of options at link-time. We also provide
141 support here for as many of the other svr4 linker options as seems
142 reasonable, given that some of them conflict with options for other
143 svr4 tools (e.g. the assembler). In particular, we do support the
144 -h*, -z*, -V, -b, -t, -Qy, -Qn, and -YP* options here, and the -e*,
145 -l*, -o*, -r, -s, -u*, and -L* options are directly supported
146 by gcc.c itself. We don't directly support the -m (generate load
147 map) option because that conflicts with the -m (run m4) option of
148 the svr4 assembler. We also don't directly support the svr4 linker's
149 -I* or -M* options because these conflict with existing GCC options.
150 We do however allow passing arbitrary options to the svr4 linker
151 via the -Wl, option. We don't support the svr4 linker's -a option
152 at all because it is totally useless and because it conflicts with
153 GCC's own -a option.
154
155 Note that gcc doesn't allow a space to follow -Y in a -YP,* option.
156
157 When the -G link option is used (-shared and -symbolic) a final link is
158 not being done. */
159
160 #undef LINK_SPEC
161 #define LINK_SPEC "%{h*} %{V} %{v:%{!V:-V}} \
162 %{b} %{Wl,*:%*} \
163 %{static:-dn -Bstatic} \
164 %{shared:-G -dy} \
165 %{symbolic:-Bsymbolic -G -dy} \
166 %{G:-G} \
167 %{YP,*} \
168 %{!YP,*:%{p:-Y P,/usr/ccs/lib/libp:/usr/lib/libp:/usr/ccs/lib:/usr/lib} \
169 %{!p:-Y P,/usr/ccs/lib:/usr/lib}} \
170 %{Qy:} %{!Qn:-Qy}"
171
172 /* Gcc automatically adds in one of the files /usr/ccs/lib/values-Xc.o,
173 /usr/ccs/lib/values-Xa.o, or /usr/ccs/lib/values-Xt.o for each final
174 link step (depending upon the other gcc options selected, such as
175 -traditional and -ansi). These files each contain one (initialized)
176 copy of a special variable called `_lib_version'. Each one of these
177 files has `_lib_version' initialized to a different (enum) value.
178 The SVR4 library routines query the value of `_lib_version' at run
179 to decide how they should behave. Specifically, they decide (based
180 upon the value of `_lib_version') if they will act in a strictly ANSI
181 conforming manner or not.
182 */
183
184 #undef STARTFILE_SPEC
185 #define STARTFILE_SPEC "%{!shared: \
186 %{!symbolic: \
187 %{pg:gcrt1.o%s}%{!pg:%{p:mcrt1.o%s}%{!p:crt1.o%s}} \
188 %{pg:gcrti.o%s}%{!pg:crti.o%s} \
189 %{ansi:values-Xc.o%s} \
190 %{!ansi: \
191 %{traditional:values-Xt.o%s} \
192 %{!traditional:values-Xa.o%s}}}} crtbegin.o%s"
193
194 /* Attach a special .ident directive to the end of the file to identify
195 the version of GCC which compiled this code. The format of the
196 .ident string is patterned after the ones produced by native svr4
197 C compilers. */
198
199 #define IDENT_ASM_OP ".ident"
200
201 #define ASM_FILE_END(FILE) \
202 do { \
203 fprintf ((FILE), "\t%s\t\"GCC: (GNU) %s\"\n", \
204 IDENT_ASM_OP, version_string); \
205 } while (0)
206
207 /* Allow #sccs in preprocessor. */
208
209 #define SCCS_DIRECTIVE
210
211 /* Output #ident as a .ident. */
212
213 #define ASM_OUTPUT_IDENT(FILE, NAME) \
214 fprintf (FILE, "\t%s\t\"%s\"\n", IDENT_ASM_OP, NAME);
215
216 /* Use periods rather than dollar signs in special g++ assembler names. */
217
218 #define NO_DOLLAR_IN_LABEL
219
220 /* Writing `int' for a bitfield forces int alignment for the structure. */
221
222 #define PCC_BITFIELD_TYPE_MATTERS 1
223
224 /* Implicit library calls should use memcpy, not bcopy, etc. */
225
226 #define TARGET_MEM_FUNCTIONS
227
228 /* Handle #pragma weak and #pragma pack. */
229
230 #define HANDLE_SYSV_PRAGMA
231
232 /* System V Release 4 uses DWARF debugging info. */
233
234 #define DWARF_DEBUGGING_INFO
235
236 /* The numbers used to denote specific machine registers in the System V
237 Release 4 DWARF debugging information are quite likely to be totally
238 different from the numbers used in BSD stabs debugging information
239 for the same kind of target machine. Thus, we undefine the macro
240 DBX_REGISTER_NUMBER here as an extra inducement to get people to
241 provide proper machine-specific definitions of DBX_REGISTER_NUMBER
242 (which is also used to provide DWARF registers numbers in dwarfout.c)
243 in their tm.h files which include this file. */
244
245 #undef DBX_REGISTER_NUMBER
246
247 /* Define the actual types of some ANSI-mandated types. (These
248 definitions should work for most SVR4 systems). */
249
250 #undef SIZE_TYPE
251 #define SIZE_TYPE "unsigned int"
252
253 #undef PTRDIFF_TYPE
254 #define PTRDIFF_TYPE "int"
255
256 #undef WCHAR_TYPE
257 #define WCHAR_TYPE "long int"
258
259 #undef WCHAR_TYPE_SIZE
260 #define WCHAR_TYPE_SIZE BITS_PER_WORD
261
262 /* This causes trouble, because it requires the host machine
263 to support ANSI C. */
264 /* #define MULTIBYTE_CHARS */
265
266 #undef ASM_BYTE_OP
267 #define ASM_BYTE_OP ".byte"
268
269 #undef SET_ASM_OP
270 #define SET_ASM_OP ".set"
271
272 /* This is how to begin an assembly language file. Most svr4 assemblers want
273 at least a .file directive to come first, and some want to see a .version
274 directive come right after that. Here we just establish a default
275 which generates only the .file directive. If you need a .version
276 directive for any specific target, you should override this definition
277 in the target-specific file which includes this one. */
278
279 #undef ASM_FILE_START
280 #define ASM_FILE_START(FILE) \
281 output_file_directive ((FILE), main_input_filename)
282
283 /* This is how to allocate empty space in some section. The .zero
284 pseudo-op is used for this on most svr4 assemblers. */
285
286 #define SKIP_ASM_OP ".zero"
287
288 #undef ASM_OUTPUT_SKIP
289 #define ASM_OUTPUT_SKIP(FILE,SIZE) \
290 fprintf (FILE, "\t%s\t%u\n", SKIP_ASM_OP, (SIZE))
291
292 /* This is how to output a reference to a user-level label named NAME.
293 `assemble_name' uses this.
294
295 For System V Release 4 the convention is *not* to prepend a leading
296 underscore onto user-level symbol names. */
297
298 #undef ASM_OUTPUT_LABELREF
299 #define ASM_OUTPUT_LABELREF(FILE,NAME) fprintf (FILE, "%s", NAME)
300
301 /* This is how to output an internal numbered label where
302 PREFIX is the class of label and NUM is the number within the class.
303
304 For most svr4 systems, the convention is that any symbol which begins
305 with a period is not put into the linker symbol table by the assembler. */
306
307 #undef ASM_OUTPUT_INTERNAL_LABEL
308 #define ASM_OUTPUT_INTERNAL_LABEL(FILE, PREFIX, NUM) \
309 do { \
310 fprintf (FILE, ".%s%d:\n", PREFIX, NUM); \
311 } while (0)
312
313 /* This is how to store into the string LABEL
314 the symbol_ref name of an internal numbered label where
315 PREFIX is the class of label and NUM is the number within the class.
316 This is suitable for output with `assemble_name'.
317
318 For most svr4 systems, the convention is that any symbol which begins
319 with a period is not put into the linker symbol table by the assembler. */
320
321 #undef ASM_GENERATE_INTERNAL_LABEL
322 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
323 do { \
324 sprintf (LABEL, "*.%s%d", PREFIX, NUM); \
325 } while (0)
326
327 /* Output the label which precedes a jumptable. Note that for all svr4
328 systems where we actually generate jumptables (which is to say every
329 svr4 target except i386, where we use casesi instead) we put the jump-
330 tables into the .rodata section and since other stuff could have been
331 put into the .rodata section prior to any given jumptable, we have to
332 make sure that the location counter for the .rodata section gets pro-
333 perly re-aligned prior to the actual beginning of the jump table. */
334
335 #define ALIGN_ASM_OP ".align"
336
337 #ifndef ASM_OUTPUT_BEFORE_CASE_LABEL
338 #define ASM_OUTPUT_BEFORE_CASE_LABEL(FILE,PREFIX,NUM,TABLE) \
339 ASM_OUTPUT_ALIGN ((FILE), 2);
340 #endif
341
342 #undef ASM_OUTPUT_CASE_LABEL
343 #define ASM_OUTPUT_CASE_LABEL(FILE,PREFIX,NUM,JUMPTABLE) \
344 do { \
345 ASM_OUTPUT_BEFORE_CASE_LABEL (FILE, PREFIX, NUM, JUMPTABLE) \
346 ASM_OUTPUT_INTERNAL_LABEL (FILE, PREFIX, NUM); \
347 } while (0)
348
349 /* The standard SVR4 assembler seems to require that certain builtin
350 library routines (e.g. .udiv) be explicitly declared as .globl
351 in each assembly file where they are referenced. */
352
353 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN) \
354 ASM_GLOBALIZE_LABEL (FILE, XSTR (FUN, 0))
355
356 /* This says how to output assembler code to declare an
357 uninitialized external linkage data object. Under SVR4,
358 the linker seems to want the alignment of data objects
359 to depend on their types. We do exactly that here. */
360
361 #define COMMON_ASM_OP ".comm"
362
363 #undef ASM_OUTPUT_ALIGNED_COMMON
364 #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN) \
365 do { \
366 fprintf ((FILE), "\t%s\t", COMMON_ASM_OP); \
367 assemble_name ((FILE), (NAME)); \
368 fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT); \
369 } while (0)
370
371 /* This says how to output assembler code to declare an
372 uninitialized internal linkage data object. Under SVR4,
373 the linker seems to want the alignment of data objects
374 to depend on their types. We do exactly that here. */
375
376 #define LOCAL_ASM_OP ".local"
377
378 #undef ASM_OUTPUT_ALIGNED_LOCAL
379 #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN) \
380 do { \
381 fprintf ((FILE), "\t%s\t", LOCAL_ASM_OP); \
382 assemble_name ((FILE), (NAME)); \
383 fprintf ((FILE), "\n"); \
384 ASM_OUTPUT_ALIGNED_COMMON (FILE, NAME, SIZE, ALIGN); \
385 } while (0)
386
387 /* This is the pseudo-op used to generate a 32-bit word of data with a
388 specific value in some section. This is the same for all known svr4
389 assemblers. */
390
391 #define INT_ASM_OP ".long"
392
393 /* This is the pseudo-op used to generate a contiguous sequence of byte
394 values from a double-quoted string WITHOUT HAVING A TERMINATING NUL
395 AUTOMATICALLY APPENDED. This is the same for most svr4 assemblers. */
396
397 #undef ASCII_DATA_ASM_OP
398 #define ASCII_DATA_ASM_OP ".ascii"
399
400 /* Support const sections and the ctors and dtors sections for g++.
401 Note that there appears to be two different ways to support const
402 sections at the moment. You can either #define the symbol
403 READONLY_DATA_SECTION (giving it some code which switches to the
404 readonly data section) or else you can #define the symbols
405 EXTRA_SECTIONS, EXTRA_SECTION_FUNCTIONS, SELECT_SECTION, and
406 SELECT_RTX_SECTION. We do both here just to be on the safe side. */
407
408 #define USE_CONST_SECTION 1
409
410 #define CONST_SECTION_ASM_OP ".section\t.rodata"
411 #define CTORS_SECTION_ASM_OP ".section\t.ctors,\"a\",@progbits"
412 #define DTORS_SECTION_ASM_OP ".section\t.dtors,\"a\",@progbits"
413
414 /* On svr4, we *do* have support for the .init section, and we can put
415 stuff in there to be executed before `main'. We let crtstuff.c and
416 other files know this by defining the following symbol. The definition
417 says how to change sections to the .init section. This is the same
418 for all know svr4 assemblers. */
419
420 #define INIT_SECTION_ASM_OP ".section\t.init"
421
422 /* A default list of other sections which we might be "in" at any given
423 time. For targets that use additional sections (e.g. .tdesc) you
424 should override this definition in the target-specific file which
425 includes this file. */
426
427 #undef EXTRA_SECTIONS
428 #define EXTRA_SECTIONS in_const, in_ctors, in_dtors
429
430 /* A default list of extra section function definitions. For targets
431 that use additional sections (e.g. .tdesc) you should override this
432 definition in the target-specific file which includes this file. */
433
434 #undef EXTRA_SECTION_FUNCTIONS
435 #define EXTRA_SECTION_FUNCTIONS \
436 CONST_SECTION_FUNCTION \
437 CTORS_SECTION_FUNCTION \
438 DTORS_SECTION_FUNCTION
439
440 #define READONLY_DATA_SECTION() const_section ()
441
442 extern void text_section ();
443
444 #define CONST_SECTION_FUNCTION \
445 void \
446 const_section () \
447 { \
448 if (!USE_CONST_SECTION) \
449 text_section(); \
450 else if (in_section != in_const) \
451 { \
452 fprintf (asm_out_file, "%s\n", CONST_SECTION_ASM_OP); \
453 in_section = in_const; \
454 } \
455 }
456
457 #define CTORS_SECTION_FUNCTION \
458 void \
459 ctors_section () \
460 { \
461 if (in_section != in_ctors) \
462 { \
463 fprintf (asm_out_file, "%s\n", CTORS_SECTION_ASM_OP); \
464 in_section = in_ctors; \
465 } \
466 }
467
468 #define DTORS_SECTION_FUNCTION \
469 void \
470 dtors_section () \
471 { \
472 if (in_section != in_dtors) \
473 { \
474 fprintf (asm_out_file, "%s\n", DTORS_SECTION_ASM_OP); \
475 in_section = in_dtors; \
476 } \
477 }
478
479 /* Switch into a generic section.
480 This is currently only used to support section attributes. */
481
482 #define ASM_OUTPUT_SECTION(FILE, NAME) \
483 fprintf (FILE, ".section\t%s,\"a\",@progbits\n", NAME)
484
485 /* A C statement (sans semicolon) to output an element in the table of
486 global constructors. */
487 #define ASM_OUTPUT_CONSTRUCTOR(FILE,NAME) \
488 do { \
489 ctors_section (); \
490 fprintf (FILE, "\t%s\t ", INT_ASM_OP); \
491 assemble_name (FILE, NAME); \
492 fprintf (FILE, "\n"); \
493 } while (0)
494
495 /* A C statement (sans semicolon) to output an element in the table of
496 global destructors. */
497 #define ASM_OUTPUT_DESTRUCTOR(FILE,NAME) \
498 do { \
499 dtors_section (); \
500 fprintf (FILE, "\t%s\t ", INT_ASM_OP); \
501 assemble_name (FILE, NAME); \
502 fprintf (FILE, "\n"); \
503 } while (0)
504
505 /* A C statement or statements to switch to the appropriate
506 section for output of DECL. DECL is either a `VAR_DECL' node
507 or a constant of some sort. RELOC indicates whether forming
508 the initial value of DECL requires link-time relocations. */
509
510 #define SELECT_SECTION(DECL,RELOC) \
511 { \
512 if (TREE_CODE (DECL) == STRING_CST) \
513 { \
514 if (! flag_writable_strings) \
515 const_section (); \
516 else \
517 data_section (); \
518 } \
519 else if (TREE_CODE (DECL) == VAR_DECL) \
520 { \
521 if ((flag_pic && RELOC) \
522 || !TREE_READONLY (DECL) || TREE_SIDE_EFFECTS (DECL) \
523 || !DECL_INITIAL (DECL) \
524 || (DECL_INITIAL (DECL) != error_mark_node \
525 && !TREE_CONSTANT (DECL_INITIAL (DECL)))) \
526 data_section (); \
527 else \
528 const_section (); \
529 } \
530 else \
531 const_section (); \
532 }
533
534 /* A C statement or statements to switch to the appropriate
535 section for output of RTX in mode MODE. RTX is some kind
536 of constant in RTL. The argument MODE is redundant except
537 in the case of a `const_int' rtx. Currently, these always
538 go into the const section. */
539
540 #undef SELECT_RTX_SECTION
541 #define SELECT_RTX_SECTION(MODE,RTX) const_section()
542
543 /* Define the strings used for the special svr4 .type and .size directives.
544 These strings generally do not vary from one system running svr4 to
545 another, but if a given system (e.g. m88k running svr) needs to use
546 different pseudo-op names for these, they may be overridden in the
547 file which includes this one. */
548
549 #define TYPE_ASM_OP ".type"
550 #define SIZE_ASM_OP ".size"
551 #define WEAK_ASM_OP ".weak"
552
553 /* The following macro defines the format used to output the second
554 operand of the .type assembler directive. Different svr4 assemblers
555 expect various different forms for this operand. The one given here
556 is just a default. You may need to override it in your machine-
557 specific tm.h file (depending upon the particulars of your assembler). */
558
559 #define TYPE_OPERAND_FMT "@%s"
560
561 /* Write the extra assembler code needed to declare a function's result.
562 Most svr4 assemblers don't require any special declaration of the
563 result value, but there are exceptions. */
564
565 #ifndef ASM_DECLARE_RESULT
566 #define ASM_DECLARE_RESULT(FILE, RESULT)
567 #endif
568
569 /* These macros generate the special .type and .size directives which
570 are used to set the corresponding fields of the linker symbol table
571 entries in an ELF object file under SVR4. These macros also output
572 the starting labels for the relevant functions/objects. */
573
574 /* Write the extra assembler code needed to declare a function properly.
575 Some svr4 assemblers need to also have something extra said about the
576 function's return value. We allow for that here. */
577
578 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \
579 do { \
580 fprintf (FILE, "\t%s\t ", TYPE_ASM_OP); \
581 assemble_name (FILE, NAME); \
582 putc (',', FILE); \
583 fprintf (FILE, TYPE_OPERAND_FMT, "function"); \
584 putc ('\n', FILE); \
585 ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL)); \
586 ASM_OUTPUT_LABEL(FILE, NAME); \
587 } while (0)
588
589 /* Write the extra assembler code needed to declare an object properly. */
590
591 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL) \
592 do { \
593 fprintf (FILE, "\t%s\t ", TYPE_ASM_OP); \
594 assemble_name (FILE, NAME); \
595 putc (',', FILE); \
596 fprintf (FILE, TYPE_OPERAND_FMT, "object"); \
597 putc ('\n', FILE); \
598 size_directive_output = 0; \
599 if (!flag_inhibit_size_directive && DECL_SIZE (DECL)) \
600 { \
601 size_directive_output = 1; \
602 fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \
603 assemble_name (FILE, NAME); \
604 fprintf (FILE, ",%d\n", int_size_in_bytes (TREE_TYPE (DECL))); \
605 } \
606 ASM_OUTPUT_LABEL(FILE, NAME); \
607 } while (0)
608
609 /* Output the size directive for a decl in rest_of_decl_compilation
610 in the case where we did not do so before the initializer.
611 Once we find the error_mark_node, we know that the value of
612 size_directive_output was set
613 by ASM_DECLARE_OBJECT_NAME when it was run for the same decl. */
614
615 #define ASM_FINISH_DECLARE_OBJECT(FILE, DECL, TOP_LEVEL, AT_END) \
616 do { \
617 char *name = XSTR (XEXP (DECL_RTL (DECL), 0), 0); \
618 if (!flag_inhibit_size_directive && DECL_SIZE (DECL) \
619 && ! AT_END && TOP_LEVEL \
620 && DECL_INITIAL (DECL) == error_mark_node \
621 && !size_directive_output) \
622 { \
623 size_directive_output = 1; \
624 fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \
625 assemble_name (FILE, name); \
626 fprintf (FILE, ",%d\n", int_size_in_bytes (TREE_TYPE (DECL))); \
627 } \
628 } while (0)
629
630 /* This is how to declare the size of a function. */
631
632 #define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL) \
633 do { \
634 if (!flag_inhibit_size_directive) \
635 { \
636 char label[256]; \
637 static int labelno; \
638 labelno++; \
639 ASM_GENERATE_INTERNAL_LABEL (label, "Lfe", labelno); \
640 ASM_OUTPUT_INTERNAL_LABEL (FILE, "Lfe", labelno); \
641 fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \
642 assemble_name (FILE, (FNAME)); \
643 fprintf (FILE, ","); \
644 assemble_name (FILE, label); \
645 fprintf (FILE, "-"); \
646 assemble_name (FILE, (FNAME)); \
647 putc ('\n', FILE); \
648 } \
649 } while (0)
650
651 /* A table of bytes codes used by the ASM_OUTPUT_ASCII and
652 ASM_OUTPUT_LIMITED_STRING macros. Each byte in the table
653 corresponds to a particular byte value [0..255]. For any
654 given byte value, if the value in the corresponding table
655 position is zero, the given character can be output directly.
656 If the table value is 1, the byte must be output as a \ooo
657 octal escape. If the tables value is anything else, then the
658 byte value should be output as a \ followed by the value
659 in the table. Note that we can use standard UN*X escape
660 sequences for many control characters, but we don't use
661 \a to represent BEL because some svr4 assemblers (e.g. on
662 the i386) don't know about that. */
663
664 #define ESCAPES \
665 "\1\1\1\1\1\1\1\1btnvfr\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
666 \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\
667 \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\
668 \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\
669 \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\
670 \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\
671 \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\
672 \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"
673
674 /* Some svr4 assemblers have a limit on the number of characters which
675 can appear in the operand of a .string directive. If your assembler
676 has such a limitation, you should define STRING_LIMIT to reflect that
677 limit. Note that at least some svr4 assemblers have a limit on the
678 actual number of bytes in the double-quoted string, and that they
679 count each character in an escape sequence as one byte. Thus, an
680 escape sequence like \377 would count as four bytes.
681
682 If your target assembler doesn't support the .string directive, you
683 should define this to zero.
684 */
685
686 #define STRING_LIMIT ((unsigned) 256)
687
688 #define STRING_ASM_OP ".string"
689
690 /* The routine used to output NUL terminated strings. We use a special
691 version of this for most svr4 targets because doing so makes the
692 generated assembly code more compact (and thus faster to assemble)
693 as well as more readable, especially for targets like the i386
694 (where the only alternative is to output character sequences as
695 comma separated lists of numbers). */
696
697 #define ASM_OUTPUT_LIMITED_STRING(FILE, STR) \
698 do \
699 { \
700 register unsigned char *_limited_str = (unsigned char *) (STR); \
701 register unsigned ch; \
702 fprintf ((FILE), "\t%s\t\"", STRING_ASM_OP); \
703 for (; ch = *_limited_str; _limited_str++) \
704 { \
705 register int escape; \
706 switch (escape = ESCAPES[ch]) \
707 { \
708 case 0: \
709 putc (ch, (FILE)); \
710 break; \
711 case 1: \
712 fprintf ((FILE), "\\%03o", ch); \
713 break; \
714 default: \
715 putc ('\\', (FILE)); \
716 putc (escape, (FILE)); \
717 break; \
718 } \
719 } \
720 fprintf ((FILE), "\"\n"); \
721 } \
722 while (0)
723
724 /* The routine used to output sequences of byte values. We use a special
725 version of this for most svr4 targets because doing so makes the
726 generated assembly code more compact (and thus faster to assemble)
727 as well as more readable. Note that if we find subparts of the
728 character sequence which end with NUL (and which are shorter than
729 STRING_LIMIT) we output those using ASM_OUTPUT_LIMITED_STRING. */
730
731 #undef ASM_OUTPUT_ASCII
732 #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH) \
733 do \
734 { \
735 register unsigned char *_ascii_bytes = (unsigned char *) (STR); \
736 register unsigned char *limit = _ascii_bytes + (LENGTH); \
737 register unsigned bytes_in_chunk = 0; \
738 for (; _ascii_bytes < limit; _ascii_bytes++) \
739 { \
740 register unsigned char *p; \
741 if (bytes_in_chunk >= 60) \
742 { \
743 fprintf ((FILE), "\"\n"); \
744 bytes_in_chunk = 0; \
745 } \
746 for (p = _ascii_bytes; p < limit && *p != '\0'; p++) \
747 continue; \
748 if (p < limit && (p - _ascii_bytes) <= STRING_LIMIT) \
749 { \
750 if (bytes_in_chunk > 0) \
751 { \
752 fprintf ((FILE), "\"\n"); \
753 bytes_in_chunk = 0; \
754 } \
755 ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes); \
756 _ascii_bytes = p; \
757 } \
758 else \
759 { \
760 register int escape; \
761 register unsigned ch; \
762 if (bytes_in_chunk == 0) \
763 fprintf ((FILE), "\t%s\t\"", ASCII_DATA_ASM_OP); \
764 switch (escape = ESCAPES[ch = *_ascii_bytes]) \
765 { \
766 case 0: \
767 putc (ch, (FILE)); \
768 bytes_in_chunk++; \
769 break; \
770 case 1: \
771 fprintf ((FILE), "\\%03o", ch); \
772 bytes_in_chunk += 4; \
773 break; \
774 default: \
775 putc ('\\', (FILE)); \
776 putc (escape, (FILE)); \
777 bytes_in_chunk += 2; \
778 break; \
779 } \
780 } \
781 } \
782 if (bytes_in_chunk > 0) \
783 fprintf ((FILE), "\"\n"); \
784 } \
785 while (0)