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 Free Software Foundation, Inc.
   4
   5    Written by Ron Guilmette (rfg@ncd.com).
   6
   7 This file is part of GNU CC.
   8
   9 GNU CC is free software; you can redistribute it and/or modify
  10 it under the terms of the GNU General Public License as published by
  11 the Free Software Foundation; either version 2, or (at your option)
  12 any later version.
  13
  14 GNU CC is distributed in the hope that it will be useful,
  15 but WITHOUT ANY WARRANTY; without even the implied warranty of
  16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17 GNU General Public License for more details.
  18
  19 You should have received a copy of the GNU General Public License
  20 along with GNU CC; see the file COPYING.  If not, write to
  21 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, 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 /* For the sake of libgcc2.c, indicate target supports atexit.  */
  43 #define HAVE_ATEXIT
  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   (   (CHAR) == 'D' \
  54    || (CHAR) == 'U' \
  55    || (CHAR) == 'o' \
  56    || (CHAR) == 'e' \
  57    || (CHAR) == 'u' \
  58    || (CHAR) == 'I' \
  59    || (CHAR) == 'm' \
  60    || (CHAR) == 'L' \
  61    || (CHAR) == 'A' \
  62    || (CHAR) == 'h' \
  63    || (CHAR) == 'z')
  64
  65 /* This defines which multi-letter switches take arguments.  On svr4,
  66    there are no such switches except those implemented by GCC itself.  */
  67
  68 #define WORD_SWITCH_TAKES_ARG(STR)                      \
  69  (!strcmp (STR, "include") || !strcmp (STR, "imacros")  \
  70   || !strcmp (STR, "aux-info"))
  71
  72 /* You should redefine CPP_PREDEFINES in any file which includes this one.
  73    The definition should be appropriate for the type of target system
  74    involved, and it should include any -A (assertion) options which are
  75    appropriate for the given target system.  */
  76 #undef CPP_PREDEFINES
  77
  78 /* Provide an ASM_SPEC appropriate for svr4.  Here we try to support as
  79    many of the specialized svr4 assembler options as seems reasonable,
  80    given that there are certain options which we can't (or shouldn't)
  81    support directly due to the fact that they conflict with other options
  82    for other svr4 tools (e.g. ld) or with other options for GCC itself.
  83    For example, we don't support the -o (output file) or -R (remove
  84    input file) options because GCC already handles these things.  We
  85    also don't support the -m (run m4) option for the assembler because
  86    that conflicts with the -m (produce load map) option of the svr4
  87    linker.  We do however allow passing arbitrary options to the svr4
  88    assembler via the -Wa, option.
  89
  90    Note that gcc doesn't allow a space to follow -Y in a -Ym,* or -Yd,*
  91    option.
  92 */
  93
  94 #undef ASM_SPEC
  95 #define ASM_SPEC \
  96   "%{V} %{v:%{!V:-V}} %{Qy:} %{!Qn:-Qy} %{n} %{T} %{Ym,*} %{Yd,*} %{Wa,*:%*}"
  97
  98 /* svr4 assemblers need the `-' (indicating input from stdin) to come after
  99    the -o option (and its argument) for some reason.  If we try to put it
 100    before the -o option, the assembler will try to read the file named as
 101    the output file in the -o option as an input file (after it has already
 102    written some stuff to it) and the binary stuff contained therein will
 103    cause totally confuse the assembler, resulting in many spurious error
 104    messages.  */
 105
 106 #undef ASM_FINAL_SPEC
 107 #define ASM_FINAL_SPEC "%{pipe:-}"
 108
 109 /* Under svr4, the normal location of the various *crt*.o files is the
 110    /usr/ccs/lib directory.  */
 111
 112 #undef MD_STARTFILE_PREFIX
 113 #define MD_STARTFILE_PREFIX "/usr/ccs/lib/"
 114
 115 /* Provide a LIB_SPEC appropriate for svr4.  Here we tack on the default
 116    standard C library (unless we are building a shared library) followed by
 117    our own magical crtend.o file (see crtstuff.c) which provides part of
 118    the support for getting C++ file-scope static object constructed before
 119    entering `main', followed by the normal svr3/svr4 "finalizer" file,
 120    which is either `gcrtn.o' or `crtn.o'.  */
 121
 122 #undef  LIB_SPEC
 123 #define LIB_SPEC \
 124   "%{!shared:%{!symbolic:-lc}} \
 125   crtend.o%s \
 126   %{!shared:%{!symbolic:%{pg:gcrtn.o}%{!pg:crtn.o%s}}}"
 127
 128 /* Provide a LINK_SPEC appropriate for svr4.  Here we provide support
 129    for the special GCC options -static, -shared, and -symbolic which
 130    allow us to link things in one of these three modes by applying the
 131    appropriate combinations of options at link-time.  We also provide
 132    support here for as many of the other svr4 linker options as seems
 133    reasonable, given that some of them conflict with options for other
 134    svr4 tools (e.g. the assembler).  In particular, we do support the
 135    -h*, -z*, -V, -b, -t, -Qy, -Qn, and -YP* options here, and the -e*,
 136    -l*, -o*, -r, -s, -u*, and -L* options are directly supported
 137    by gcc.c itself.  We don't directly support the -m (generate load
 138    map) option because that conflicts with the -m (run m4) option of
 139    the svr4 assembler.  We also don't directly support the svr4 linker's
 140    -I* or -M* options because these conflict with existing GCC options.
 141    We do however allow passing arbitrary options to the svr4 linker
 142    via the -Wl, option.  We don't support the svr4 linker's -a option
 143    at all because it is totally useless and because it conflicts with
 144    GCC's own -a option.
 145
 146    Note that gcc doesn't allow a space to follow -Y in a -YP,* option.
 147
 148    When the -G link option is used (-shared and -symbolic) a final link is
 149    not being done.  */
 150
 151 #undef  LINK_SPEC
 152 #define LINK_SPEC "%{h*} %{V} %{v:%{!V:-V}} \
 153                    %{b} %{Wl,*:%*} \
 154                    %{static:-dn -Bstatic} \
 155                    %{shared:-G -dy} \
 156                    %{symbolic:-Bsymbolic -G -dy} \
 157                    %{G:-G} \
 158                    %{YP,*} \
 159                    %{!YP,*:%{p:-Y P,/usr/ccs/lib/libp:/usr/lib/libp:/usr/ccs/lib:/usr/lib} \
 160                     %{!p:-Y P,/usr/ccs/lib:/usr/lib}} \
 161                    %{Qy:} %{!Qn:-Qy}"
 162
 163 /* Gcc automatically adds in one of the files /usr/ccs/lib/values-Xc.o,
 164    /usr/ccs/lib/values-Xa.o, or /usr/ccs/lib/values-Xt.o for each final
 165    link step (depending upon the other gcc options selected, such as
 166    -traditional and -ansi).  These files each contain one (initialized)
 167    copy of a special variable called `_lib_version'.  Each one of these
 168    files has `_lib_version' initialized to a different (enum) value.
 169    The SVR4 library routines query the value of `_lib_version' at run
 170    to decide how they should behave.  Specifically, they decide (based
 171    upon the value of `_lib_version') if they will act in a strictly ANSI
 172    conforming manner or not.
 173 */
 174
 175 #undef  STARTFILE_SPEC
 176 #define STARTFILE_SPEC "%{!shared: \
 177                          %{!symbolic: \
 178                           %{pg:gcrt1.o%s}%{!pg:%{p:mcrt1.o%s}%{!p:crt1.o%s}} \
 179                           %{pg:gcrti.o%s}%{!pg:crti.o%s} \
 180                           %{ansi:values-Xc.o%s} \
 181                           %{!ansi: \
 182                            %{traditional:values-Xt.o%s} \
 183                            %{!traditional:values-Xa.o%s}}}} crtbegin.o%s"
 184
 185 /* Attach a special .ident directive to the end of the file to identify
 186    the version of GCC which compiled this code.  The format of the
 187    .ident string is patterned after the ones produced by native svr4
 188    C compilers.  */
 189
 190 #define ASM_FILE_END(FILE)                                      \
 191 do {                                                            \
 192      fprintf ((FILE), "\t.ident\t\"GCC: (GNU) %s\"\n",          \
 193               version_string);                                  \
 194    } while (0)
 195
 196 /* Allow #sccs in preprocessor.  */
 197
 198 #define SCCS_DIRECTIVE
 199
 200 /* Output #ident as a .ident.  */
 201
 202 #define ASM_OUTPUT_IDENT(FILE, NAME) \
 203   fprintf (FILE, "\t.ident \"%s\"\n", NAME);
 204
 205 /* Use periods rather than dollar signs in special g++ assembler names.  */
 206
 207 #define NO_DOLLAR_IN_LABEL
 208
 209 /* Writing `int' for a bitfield forces int alignment for the structure.  */
 210
 211 #define PCC_BITFIELD_TYPE_MATTERS 1
 212
 213 /* Implicit library calls should use memcpy, not bcopy, etc.  */
 214
 215 #define TARGET_MEM_FUNCTIONS
 216
 217 /* System V Release 4 uses DWARF debugging info.  */
 218
 219 #define DWARF_DEBUGGING_INFO
 220
 221 /* The numbers used to denote specific machine registers in the System V
 222    Release 4 DWARF debugging information are quite likely to be totally
 223    different from the numbers used in BSD stabs debugging information
 224    for the same kind of target machine.  Thus, we undefine the macro
 225    DBX_REGISTER_NUMBER here as an extra inducement to get people to
 226    provide proper machine-specific definitions of DBX_REGISTER_NUMBER
 227    (which is also used to provide DWARF registers numbers in dwarfout.c)
 228    in their tm.h files which include this file.  */
 229
 230 #undef DBX_REGISTER_NUMBER
 231
 232 /* Define the actual types of some ANSI-mandated types.  (These
 233    definitions should work for most SVR4 systems).  */
 234
 235 #undef SIZE_TYPE
 236 #define SIZE_TYPE "unsigned int"
 237
 238 #undef PTRDIFF_TYPE
 239 #define PTRDIFF_TYPE "int"
 240
 241 #undef WCHAR_TYPE
 242 #define WCHAR_TYPE "long int"
 243
 244 #undef WCHAR_TYPE_SIZE
 245 #define WCHAR_TYPE_SIZE BITS_PER_WORD
 246
 247 #define MULTIBYTE_CHARS
 248
 249 #undef ASM_BYTE_OP
 250 #define ASM_BYTE_OP     "\t.byte"
 251
 252 /* This is how to begin an assembly language file.  Most svr4 assemblers want
 253    at least a .file directive to come first, and some want to see a .version
 254    directive come right after that.  Here we just establish a default
 255    which generates only the .file directive.  If you need a .version
 256    directive for any specific target, you should override this definition
 257    in the target-specific file which includes this one.  */
 258
 259 #undef ASM_FILE_START
 260 #define ASM_FILE_START(FILE)                                    \
 261   output_file_directive ((FILE), main_input_filename)
 262
 263 /* This is how to allocate empty space in some section.  The .zero
 264    pseudo-op is used for this on most svr4 assemblers.  */
 265
 266 #define SKIP_ASM_OP     ".zero"
 267
 268 #undef ASM_OUTPUT_SKIP
 269 #define ASM_OUTPUT_SKIP(FILE,SIZE) \
 270   fprintf (FILE, "\t%s\t%u\n", SKIP_ASM_OP, (SIZE))
 271
 272 /* This is how to output a reference to a user-level label named NAME.
 273    `assemble_name' uses this.
 274
 275    For System V Release 4 the convention is *not* to prepend a leading
 276    underscore onto user-level symbol names.  */
 277
 278 #undef ASM_OUTPUT_LABELREF
 279 #define ASM_OUTPUT_LABELREF(FILE,NAME) fprintf (FILE, "%s", NAME)
 280
 281 /* This is how to output an internal numbered label where
 282    PREFIX is the class of label and NUM is the number within the class.
 283
 284    If the NUM argument is negative, we don't use it when generating the
 285    label.
 286
 287    For most svr4 systems, the convention is that any symbol which begins
 288    with a period is not put into the linker symbol table by the assembler.
 289 */
 290
 291 #undef ASM_OUTPUT_INTERNAL_LABEL
 292 #define ASM_OUTPUT_INTERNAL_LABEL(FILE, PREFIX, NUM)                    \
 293 do {                                                                    \
 294   if ((int) (NUM) >= 0)                                                 \ ???
 295     fprintf (FILE, ".%s%d:\n", PREFIX, NUM);                            \
 296   else                                                                  \
 297     fprintf (FILE, ".%s:\n", PREFIX);                                   \
 298 } while (0)
 299
 300 /* This is how to store into the string LABEL
 301    the symbol_ref name of an internal numbered label where
 302    PREFIX is the class of label and NUM is the number within the class.
 303    This is suitable for output with `assemble_name'.
 304
 305    If the NUM argument is negative, we don't use it when generating the
 306    label.
 307
 308    For most svr4 systems, the convention is that any symbol which begins
 309    with a period is not put into the linker symbol table by the assembler.
 310 */
 311
 312 #undef ASM_GENERATE_INTERNAL_LABEL
 313 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM)                 \
 314 do {                                                                    \
 315   if ((int) (NUM) >= 0)                                                 \
 316     sprintf (LABEL, "*.%s%d", PREFIX, NUM);                             \
 317   else                                                                  \
 318     sprintf (LABEL, "*.%s", PREFIX);                                    \
 319 } while (0)
 320
 321 /* The standard SVR4 assembler seems to require that certain builtin
 322    library routines (e.g. .udiv) be explicitly declared as .globl
 323    in each assembly file where they are referenced.  */
 324
 325 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN)                          \
 326   ASM_GLOBALIZE_LABEL (FILE, XSTR (FUN, 0))
 327
 328 /* This says how to output assembler code to declare an
 329    uninitialized external linkage data object.  Under SVR4,
 330    the linker seems to want the alignment of data objects
 331    to depend on their types.  We do exactly that here.  */
 332
 333 #define COMMON_ASM_OP   ".comm"
 334
 335 #undef ASM_OUTPUT_ALIGNED_COMMON
 336 #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN)              \
 337 do {                                                                    \
 338   fprintf ((FILE), "\t%s\t", COMMON_ASM_OP);                            \
 339   assemble_name ((FILE), (NAME));                                       \
 340   fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT);        \
 341 } while (0)
 342
 343 /* This says how to output assembler code to declare an
 344    uninitialized internal linkage data object.  Under SVR4,
 345    the linker seems to want the alignment of data objects
 346    to depend on their types.  We do exactly that here.  */
 347
 348 #define BSS_ASM_OP      ".bss"
 349
 350 #undef ASM_OUTPUT_ALIGNED_LOCAL
 351 #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN)               \
 352 do {                                                                    \
 353   fprintf ((FILE), "\t%s\t%s,%u,%u\n",                                  \
 354            BSS_ASM_OP, (NAME), (SIZE), (ALIGN) / BITS_PER_UNIT);        \
 355 } while (0)
 356
 357 /* This is the pseudo-op used to generate a 32-bit word of data with a
 358    specific value in some section.  This is the same for all known svr4
 359    assemblers.  */
 360
 361 #define INT_ASM_OP              ".long"
 362
 363 /* This is the pseudo-op used to generate a contiguous sequence of byte
 364    values from a double-quoted string WITHOUT HAVING A TERMINATING NUL
 365    AUTOMATICALLY APPENDED.  This is the same for most svr4 assemblers.  */
 366
 367 #undef ASCII_DATA_ASM_OP
 368 #define ASCII_DATA_ASM_OP       ".ascii"
 369
 370 /* Support const sections and the ctors and dtors sections for g++.
 371    Note that there appears to be two different ways to support const
 372    sections at the moment.  You can either #define the symbol
 373    READONLY_DATA_SECTION (giving it some code which switches to the
 374    readonly data section) or else you can #define the symbols
 375    EXTRA_SECTIONS, EXTRA_SECTION_FUNCTIONS, SELECT_SECTION, and
 376    SELECT_RTX_SECTION.  We do both here just to be on the safe side.  */
 377
 378 #define USE_CONST_SECTION       1
 379
 380 #define CONST_SECTION_ASM_OP    ".section\t.rodata"
 381 #define CTORS_SECTION_ASM_OP    ".section\t.ctors,\"a\",@progbits"
 382 #define DTORS_SECTION_ASM_OP    ".section\t.dtors,\"a\",@progbits"
 383
 384 /* On svr4, we *do* have support for the .init section, and we can put
 385    stuff in there to be executed before `main'.  We let crtstuff.c and
 386    other files know this by defining the following symbol.  The definition
 387    says how to change sections to the .init section.  This is the same
 388    for all know svr4 assemblers.  */
 389
 390 #define INIT_SECTION_ASM_OP     ".section\t.init"
 391
 392 /* A default list of other sections which we might be "in" at any given
 393    time.  For targets that use additional sections (e.g. .tdesc) you
 394    should override this definition in the target-specific file which
 395    includes this file.  */
 396
 397 #undef EXTRA_SECTIONS
 398 #define EXTRA_SECTIONS in_const, in_ctors, in_dtors
 399
 400 /* A default list of extra section function definitions.  For targets
 401    that use additional sections (e.g. .tdesc) you should override this
 402    definition in the target-specific file which includes this file.  */
 403
 404 #undef EXTRA_SECTION_FUNCTIONS
 405 #define EXTRA_SECTION_FUNCTIONS                                         \
 406   CONST_SECTION_FUNCTION                                                \
 407   CTORS_SECTION_FUNCTION                                                \
 408   DTORS_SECTION_FUNCTION
 409
 410 #define READONLY_DATA_SECTION() const_section ()
 411
 412 extern void text_section();
 413
 414 #define CONST_SECTION_FUNCTION                                          \
 415 void                                                                    \
 416 const_section ()                                                        \
 417 {                                                                       \
 418   if (!USE_CONST_SECTION)                                               \
 419     text_section();                                                     \
 420   else if (in_section != in_const)                                      \
 421     {                                                                   \
 422       fprintf (asm_out_file, "%s\n", CONST_SECTION_ASM_OP);             \
 423       in_section = in_const;                                            \
 424     }                                                                   \
 425 }
 426
 427 #define CTORS_SECTION_FUNCTION                                          \
 428 void                                                                    \
 429 ctors_section ()                                                        \
 430 {                                                                       \
 431   if (in_section != in_ctors)                                           \
 432     {                                                                   \
 433       fprintf (asm_out_file, "%s\n", CTORS_SECTION_ASM_OP);             \
 434       in_section = in_ctors;                                            \
 435     }                                                                   \
 436 }
 437
 438 #define DTORS_SECTION_FUNCTION                                          \
 439 void                                                                    \
 440 dtors_section ()                                                        \
 441 {                                                                       \
 442   if (in_section != in_dtors)                                           \
 443     {                                                                   \
 444       fprintf (asm_out_file, "%s\n", DTORS_SECTION_ASM_OP);             \
 445       in_section = in_dtors;                                            \
 446     }                                                                   \
 447 }
 448
 449 /* A C statement (sans semicolon) to output an element in the table of
 450    global constructors.  */
 451 #define ASM_OUTPUT_CONSTRUCTOR(FILE,NAME)                               \
 452   do {                                                                  \
 453     ctors_section ();                                                   \
 454     fprintf (FILE, "\t%s\t ", INT_ASM_OP);                              \
 455     assemble_name (FILE, NAME);                                         \
 456     fprintf (FILE, "\n");                                               \
 457   } while (0)
 458
 459 /* A C statement (sans semicolon) to output an element in the table of
 460    global destructors.  */
 461 #define ASM_OUTPUT_DESTRUCTOR(FILE,NAME)                                \
 462   do {                                                                  \
 463     dtors_section ();                                                   \
 464     fprintf (FILE, "\t%s\t ", INT_ASM_OP);                              \
 465     assemble_name (FILE, NAME);                                         \
 466     fprintf (FILE, "\n");                                               \
 467   } while (0)
 468
 469 /* A C statement or statements to switch to the appropriate
 470    section for output of DECL.  DECL is either a `VAR_DECL' node
 471    or a constant of some sort.  RELOC indicates whether forming
 472    the initial value of DECL requires link-time relocations.  */
 473
 474 #define SELECT_SECTION(DECL,RELOC)                                      \
 475 {                                                                       \
 476   if (TREE_CODE (DECL) == STRING_CST)                                   \
 477     {                                                                   \
 478       if (! flag_writable_strings)                                      \
 479         const_section ();                                               \
 480       else                                                              \
 481         data_section ();                                                \
 482     }                                                                   \
 483   else if (TREE_CODE (DECL) == VAR_DECL)                                \
 484     {                                                                   \
 485       if ((flag_pic && RELOC)                                           \
 486           || !TREE_READONLY (DECL) || TREE_SIDE_EFFECTS (DECL))         \
 487         data_section ();                                                \
 488       else                                                              \
 489         const_section ();                                               \
 490     }                                                                   \
 491   else                                                                  \
 492     const_section ();                                                   \
 493 }
 494
 495 /* A C statement or statements to switch to the appropriate
 496    section for output of RTX in mode MODE.  RTX is some kind
 497    of constant in RTL.  The argument MODE is redundant except
 498    in the case of a `const_int' rtx.  Currently, these always
 499    go into the const section.  */
 500
 501 #undef SELECT_RTX_SECTION
 502 #define SELECT_RTX_SECTION(MODE,RTX) const_section()
 503
 504 /* Define the strings used for the special svr4 .type and .size directives.
 505    These strings generally do not vary from one system running svr4 to
 506    another, but if a given system (e.g. m88k running svr) needs to use
 507    different pseudo-op names for these, they may be overridden in the
 508    file which includes this one.  */
 509
 510 #define TYPE_ASM_OP     ".type"
 511 #define SIZE_ASM_OP     ".size"
 512
 513 /* The following macro defines the format used to output the second
 514    operand of the .type assembler directive.  Different svr4 assemblers
 515    expect various different forms for this operand.  The one given here
 516    is just a default.  You may need to override it in your machine-
 517    specific tm.h file (depending upon the particulars of your assembler).  */
 518
 519 #define TYPE_OPERAND_FMT        "@%s"
 520
 521 /* Write the extra assembler code needed to declare a function's result.
 522    Most svr4 assemblers don't require any special declaration of the
 523    result value, but there are exceptions.  */
 524
 525 #ifndef ASM_DECLARE_RESULT
 526 #define ASM_DECLARE_RESULT(FILE, RESULT)
 527 #endif
 528
 529 /* These macros generate the special .type and .size directives which
 530    are used to set the corresponding fields of the linker symbol table
 531    entries in an ELF object file under SVR4.  These macros also output
 532    the starting labels for the relevant functions/objects.  */
 533
 534 /* Write the extra assembler code needed to declare a function properly.
 535    Some svr4 assemblers need to also have something extra said about the
 536    function's return value.  We allow for that here.  */
 537
 538 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)                     \
 539   do {                                                                  \
 540     fprintf (FILE, "\t%s\t ", TYPE_ASM_OP);                             \
 541     assemble_name (FILE, NAME);                                         \
 542     putc (',', FILE);                                                   \
 543     fprintf (FILE, TYPE_OPERAND_FMT, "function");                       \
 544     putc ('\n', FILE);                                                  \
 545     ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL));                      \
 546     ASM_OUTPUT_LABEL(FILE, NAME);                                       \
 547   } while (0)
 548
 549 /* Write the extra assembler code needed to declare an object properly.  */
 550
 551 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL)                       \
 552   do {                                                                  \
 553     fprintf (FILE, "\t%s\t ", TYPE_ASM_OP);                             \
 554     assemble_name (FILE, NAME);                                         \
 555     putc (',', FILE);                                                   \
 556     fprintf (FILE, TYPE_OPERAND_FMT, "object");                         \
 557     putc ('\n', FILE);                                                  \
 558     if (!flag_inhibit_size_directive)                                   \
 559       {                                                                 \
 560         fprintf (FILE, "\t%s\t ", SIZE_ASM_OP);                         \
 561         assemble_name (FILE, NAME);                                     \
 562         fprintf (FILE, ",%d\n",  int_size_in_bytes (TREE_TYPE (decl))); \
 563       }                                                                 \
 564     ASM_OUTPUT_LABEL(FILE, NAME);                                       \
 565   } while (0)
 566
 567 /* This is how to declare the size of a function.  */
 568
 569 #define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL)                    \
 570   do {                                                                  \
 571     if (!flag_inhibit_size_directive)                                   \
 572       {                                                                 \
 573         char label[256];                                                \
 574         static int labelno;                                             \
 575         labelno++;                                                      \
 576         ASM_GENERATE_INTERNAL_LABEL (label, "Lfe", labelno);            \
 577         ASM_OUTPUT_INTERNAL_LABEL (FILE, "Lfe", labelno);               \
 578         fprintf (FILE, "\t%s\t ", SIZE_ASM_OP);                         \
 579         assemble_name (FILE, (FNAME));                                  \
 580         fprintf (FILE, ",");                                            \
 581         assemble_name (FILE, label);                                    \
 582         fprintf (FILE, "-");                                            \
 583         ASM_OUTPUT_LABELREF (FILE, (FNAME));                            \
 584         putc ('\n', FILE);                                              \
 585       }                                                                 \
 586   } while (0)
 587
 588 /* A table of bytes codes used by the ASM_OUTPUT_ASCII and
 589    ASM_OUTPUT_LIMITED_STRING macros.  Each byte in the table
 590    corresponds to a particular byte value [0..255].  For any
 591    given byte value, if the value in the corresponding table
 592    position is zero, the given character can be output directly.
 593    If the table value is 1, the byte must be output as a \ooo
 594    octal escape.  If the tables value is anything else, then the
 595    byte value should be output as a \ followed by the value
 596    in the table.  Note that we can use standard UN*X escape
 597    sequences for many control characters, but we don't use
 598    \a to represent BEL because some svr4 assemblers (e.g. on
 599    the i386) don't know about that.   */
 600
 601 #define ESCAPES \
 602 "\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\
 603 \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\
 604 \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\
 605 \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\
 606 \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\
 607 \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\
 608 \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\
 609 \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"
 610
 611 /* Some svr4 assemblers have a limit on the number of characters which
 612    can appear in the operand of a .string directive.  If your assembler
 613    has such a limitation, you should define STRING_LIMIT to reflect that
 614    limit.  Note that at least some svr4 assemblers have a limit on the
 615    actual number of bytes in the double-quoted string, and that they
 616    count each character in an escape sequence as one byte.  Thus, an
 617    escape sequence like \377 would count as four bytes.
 618
 619    If your target assembler doesn't support the .string directive, you
 620    should define this to zero.
 621 */
 622
 623 #define STRING_LIMIT    ((unsigned) 256)
 624
 625 #define STRING_ASM_OP   ".string"
 626
 627 /* The routine used to output NUL terminated strings.  We use a special
 628    version of this for most svr4 targets because doing so makes the
 629    generated assembly code more compact (and thus faster to assemble)
 630    as well as more readable, especially for targets like the i386
 631    (where the only alternative is to output character sequences as
 632    comma separated lists of numbers).   */
 633
 634 #define ASM_OUTPUT_LIMITED_STRING(FILE, STR)                            \
 635   do                                                                    \
 636     {                                                                   \
 637       register unsigned char *_limited_str = (unsigned char *) (STR);   \
 638       register unsigned ch;                                             \
 639       fprintf ((FILE), "\t%s\t\"", STRING_ASM_OP);                      \
 640       for (; ch = *_limited_str; _limited_str++)                        \
 641         {                                                               \
 642           register int escape;                                          \
 643           switch (escape = ESCAPES[ch])                                 \
 644             {                                                           \
 645             case 0:                                                     \
 646               putc (ch, (FILE));                                        \
 647               break;                                                    \
 648             case 1:                                                     \
 649               fprintf ((FILE), "\\%03o", ch);                           \
 650               break;                                                    \
 651             default:                                                    \
 652               putc ('\\', (FILE));                                      \
 653               putc (escape, (FILE));                                    \
 654               break;                                                    \
 655             }                                                           \
 656         }                                                               \
 657       fprintf ((FILE), "\"\n");                                         \
 658     }                                                                   \
 659   while (0)
 660
 661 /* The routine used to output sequences of byte values.  We use a special
 662    version of this for most svr4 targets because doing so makes the
 663    generated assembly code more compact (and thus faster to assemble)
 664    as well as more readable.  Note that if we find subparts of the
 665    character sequence which end with NUL (and which are shorter than
 666    STRING_LIMIT) we output those using ASM_OUTPUT_LIMITED_STRING.  */
 667
 668 #undef ASM_OUTPUT_ASCII
 669 #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH)                             \
 670   do                                                                    \
 671     {                                                                   \
 672       register unsigned char *_ascii_bytes = (unsigned char *) (STR);   \
 673       register unsigned char *limit = _ascii_bytes + (LENGTH);          \
 674       register unsigned bytes_in_chunk = 0;                             \
 675       for (; _ascii_bytes < limit; _ascii_bytes++)                      \
 676         {                                                               \
 677           register unsigned char *p;                                    \
 678           if (bytes_in_chunk >= 60)                                     \
 679             {                                                           \
 680               fprintf ((FILE), "\"\n");                                 \
 681               bytes_in_chunk = 0;                                       \
 682             }                                                           \
 683           for (p = _ascii_bytes; p < limit && *p != '\0'; p++)          \
 684             continue;                                                   \
 685           if (p < limit && (p - _ascii_bytes) <= STRING_LIMIT)          \
 686             {                                                           \
 687               if (bytes_in_chunk > 0)                                   \
 688                 {                                                       \
 689                   fprintf ((FILE), "\"\n");                             \
 690                   bytes_in_chunk = 0;                                   \
 691                 }                                                       \
 692               ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes);         \
 693               _ascii_bytes = p;                                         \
 694             }                                                           \
 695           else                                                          \
 696             {                                                           \
 697               register int escape;                                      \
 698               register unsigned ch;                                     \
 699               if (bytes_in_chunk == 0)                                  \
 700                 fprintf ((FILE), "\t%s\t\"", ASCII_DATA_ASM_OP);        \
 701               switch (escape = ESCAPES[ch = *_ascii_bytes])             \
 702                 {                                                       \
 703                 case 0:                                                 \
 704                   putc (ch, (FILE));                                    \
 705                   bytes_in_chunk++;                                     \
 706                   break;                                                \
 707                 case 1:                                                 \
 708                   fprintf ((FILE), "\\%03o", ch);                       \
 709                   bytes_in_chunk += 4;                                  \
 710                   break;                                                \
 711                 default:                                                \
 712                   putc ('\\', (FILE));                                  \
 713                   putc (escape, (FILE));                                \
 714                   bytes_in_chunk += 2;                                  \
 715                   break;                                                \
 716                 }                                                       \
 717             }                                                           \
 718         }                                                               \
 719       if (bytes_in_chunk > 0)                                           \
 720         fprintf ((FILE), "\"\n");                                       \
 721     }                                                                   \
 722   while (0)