gcc/config/i386/i386-interix.h

   1 /* Target definitions for GNU compiler for Intel 80386 running Interix
   2    Parts Copyright (C) 1991, 1999 Free Software Foundation, Inc.
   3
   4    Parts:
   5      by Douglas B. Rupp (drupp@cs.washington.edu).
   6      by Ron Guilmette (rfg@netcom.com).
   7      by Donn Terry (donn@softway.com).
   8      by Mumit Khan (khan@xraylith.wisc.edu).
   9
  10 This file is part of GNU CC.
  11
  12 GNU CC is free software; you can redistribute it and/or modify
  13 it under the terms of the GNU General Public License as published by
  14 the Free Software Foundation; either version 2, or (at your option)
  15 any later version.
  16
  17 GNU CC is distributed in the hope that it will be useful,
  18 but WITHOUT ANY WARRANTY; without even the implied warranty of
  19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20 GNU General Public License for more details.
  21
  22 You should have received a copy of the GNU General Public License
  23 along with GNU CC; see the file COPYING.  If not, write to
  24 the Free Software Foundation, 59 Temple Place - Suite 330,
  25 Boston, MA 02111-1307, USA.  */
  26
  27 #define YES_UNDERSCORES
  28
  29 /* YES_UNDERSCORES must preceed gas.h */
  30 #include <i386/gas.h>
  31 /* The rest must follow. */
  32
  33 #define DBX_DEBUGGING_INFO
  34 #define SDB_DEBUGGING_INFO
  35 #define PREFERRED_DEBUGGING_TYPE DBX_DEBUG
  36
  37 #define HANDLE_SYSV_PRAGMA
  38 #undef HANDLE_PRAGMA_WEAK  /* until the link format can handle it */
  39
  40 /* By default, target has a 80387, uses IEEE compatible arithmetic,
  41    and returns float values in the 387 and needs stack probes
  42    We also align doubles to 64-bits for MSVC default compatability */
  43 #undef TARGET_DEFAULT
  44 #define TARGET_DEFAULT \
  45    (MASK_80387 | MASK_IEEE_FP | MASK_FLOAT_RETURNS | MASK_STACK_PROBE | \
  46     MASK_ALIGN_DOUBLE)
  47
  48 #undef TARGET_CPU_DEFAULT
  49 #define TARGET_CPU_DEFAULT 2 /* 486 */
  50
  51 #define WCHAR_UNSIGNED 1
  52 #define WCHAR_TYPE_SIZE 16
  53 #define WCHAR_TYPE "short unsigned int"
  54
  55 /* WinNT (and thus Interix) use unsigned int */
  56 #define SIZE_TYPE "unsigned int"
  57
  58 #define ASM_LOAD_ADDR(loc, reg)   "     leal " #loc "," #reg "\n"
  59
  60 /* cpp handles __STDC__ */
  61 #undef CPP_PREDEFINES
  62 #define CPP_PREDEFINES " \
  63   -D__INTERIX \
  64   -D__OPENNT \
  65   -D_M_IX86=300 -D_X86_=1 \
  66   -D__stdcall=__attribute__((__stdcall__)) \
  67   -D__cdecl=__attribute__((__cdecl__)) \
  68   -Asystem(unix) -Asystem(interix) -Asystem(interix)"
  69
  70 #undef CPP_SPEC
  71 /* Write out the correct language type definition for the header files.
  72    Unless we have assembler language, write out the symbols for C.
  73    cpp_cpu is an Intel specific variant. See i386.h
  74    mieee is an Alpha specific variant.  Cross polination a bad idea.
  75    */
  76 #define CPP_SPEC "\
  77 %{!.S:  -D__LANGUAGE_C__ -D__LANGUAGE_C %{!ansi:-DLANGUAGE_C}}  \
  78 %{.S:   -D__LANGUAGE_ASSEMBLY__ -D__LANGUAGE_ASSEMBLY %{!ansi:-DLANGUAGE_ASSEMBLY}} \
  79 %{.cc:  -D__LANGUAGE_C_PLUS_PLUS__ -D__LANGUAGE_C_PLUS_PLUS -D__cplusplus} \
  80 %{.cxx: -D__LANGUAGE_C_PLUS_PLUS__ -D__LANGUAGE_C_PLUS_PLUS -D__cplusplus} \
  81 %{.C:   -D__LANGUAGE_C_PLUS_PLUS__ -D__LANGUAGE_C_PLUS_PLUS -D__cplusplus} \
  82 %{.m:   -D__LANGUAGE_OBJECTIVE_C__ -D__LANGUAGE_OBJECTIVE_C} \
  83 -remap \
  84 %(cpp_cpu) \
  85 %{posix:-D_POSIX_SOURCE} \
  86 -idirafter %$INTERIX_ROOT/usr/include"
  87
  88 #undef TARGET_VERSION
  89 #define TARGET_VERSION fprintf (stderr, " (i386 Interix)");
  90
  91 /* The global __fltused is necessary to cause the printf/scanf routines
  92    for outputting/inputting floating point numbers to be loaded.  Since this
  93    is kind of hard to detect, we just do it all the time. */
  94
  95 #ifdef ASM_FILE_START
  96 #undef ASM_FILE_START
  97 #endif
  98 #define ASM_FILE_START(FILE) \
  99   do {  fprintf (FILE, "\t.file\t");                            \
 100         output_quoted_string (FILE, dump_base_name);            \
 101         fprintf (FILE, "\n");                                   \
 102         fprintf (FILE, ".global\t__fltused\n");                 \
 103   } while (0)
 104
 105 /* A table of bytes codes used by the ASM_OUTPUT_ASCII and
 106    ASM_OUTPUT_LIMITED_STRING macros.  Each byte in the table
 107    corresponds to a particular byte value [0..255].  For any
 108    given byte value, if the value in the corresponding table
 109    position is zero, the given character can be output directly.
 110    If the table value is 1, the byte must be output as a \ooo
 111    octal escape.  If the tables value is anything else, then the
 112    byte value should be output as a \ followed by the value
 113    in the table.  Note that we can use standard UN*X escape
 114    sequences for many control characters, but we don't use
 115    \a to represent BEL because some svr4 assemblers (e.g. on
 116    the i386) don't know about that.  Also, we don't use \v
 117    since some versions of gas, such as 2.2 did not accept it.  */
 118
 119 #define ESCAPES \
 120 "\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\
 121 \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\
 122 \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\
 123 \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\
 124 \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\
 125 \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\
 126 \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\
 127 \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"
 128
 129 /* Some svr4 assemblers have a limit on the number of characters which
 130    can appear in the operand of a .string directive.  If your assembler
 131    has such a limitation, you should define STRING_LIMIT to reflect that
 132    limit.  Note that at least some svr4 assemblers have a limit on the
 133    actual number of bytes in the double-quoted string, and that they
 134    count each character in an escape sequence as one byte.  Thus, an
 135    escape sequence like \377 would count as four bytes.
 136
 137    If your target assembler doesn't support the .string directive, you
 138    should define this to zero.
 139 */
 140
 141 #define STRING_LIMIT    ((unsigned) 256)
 142
 143 #define STRING_ASM_OP   ".string"
 144
 145 /* The routine used to output NUL terminated strings.  We use a special
 146    version of this for most svr4 targets because doing so makes the
 147    generated assembly code more compact (and thus faster to assemble)
 148    as well as more readable, especially for targets like the i386
 149    (where the only alternative is to output character sequences as
 150    comma separated lists of numbers).   */
 151
 152 #define ASM_OUTPUT_LIMITED_STRING(FILE, STR)                            \
 153   do                                                                    \
 154     {                                                                   \
 155       register const unsigned char *_limited_str =                      \
 156         (const unsigned char *) (STR);                                  \
 157       register unsigned ch;                                             \
 158       fprintf ((FILE), "\t%s\t\"", STRING_ASM_OP);                      \
 159       for (; (ch = *_limited_str); _limited_str++)                      \
 160         {                                                               \
 161           register int escape = ESCAPES[ch];                            \
 162           switch (escape)                                               \
 163             {                                                           \
 164             case 0:                                                     \
 165               putc (ch, (FILE));                                        \
 166               break;                                                    \
 167             case 1:                                                     \
 168               fprintf ((FILE), "\\%03o", ch);                           \
 169               break;                                                    \
 170             default:                                                    \
 171               putc ('\\', (FILE));                                      \
 172               putc (escape, (FILE));                                    \
 173               break;                                                    \
 174             }                                                           \
 175         }                                                               \
 176       fprintf ((FILE), "\"\n");                                         \
 177     }                                                                   \
 178   while (0)
 179
 180 /* The routine used to output sequences of byte values.  We use a special
 181    version of this for most svr4 targets because doing so makes the
 182    generated assembly code more compact (and thus faster to assemble)
 183    as well as more readable.  Note that if we find subparts of the
 184    character sequence which end with NUL (and which are shorter than
 185    STRING_LIMIT) we output those using ASM_OUTPUT_LIMITED_STRING.  */
 186
 187 #undef ASM_OUTPUT_ASCII
 188 #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH)                             \
 189   do                                                                    \
 190     {                                                                   \
 191       register const unsigned char *_ascii_bytes =                      \
 192         (const unsigned char *) (STR);                                  \
 193       register const unsigned char *limit = _ascii_bytes + (LENGTH);    \
 194       register unsigned bytes_in_chunk = 0;                             \
 195       for (; _ascii_bytes < limit; _ascii_bytes++)                      \
 196         {                                                               \
 197           register const unsigned char *p;                              \
 198           if (bytes_in_chunk >= 64)                                     \
 199             {                                                           \
 200               fputc ('\n', (FILE));                                     \
 201               bytes_in_chunk = 0;                                       \
 202             }                                                           \
 203           for (p = _ascii_bytes; p < limit && *p != '\0'; p++)          \
 204             continue;                                                   \
 205           if (p < limit && (p - _ascii_bytes) <= STRING_LIMIT)          \
 206             {                                                           \
 207               if (bytes_in_chunk > 0)                                   \
 208                 {                                                       \
 209                   fputc ('\n', (FILE));                                 \
 210                   bytes_in_chunk = 0;                                   \
 211                 }                                                       \
 212               ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes);         \
 213               _ascii_bytes = p;                                         \
 214             }                                                           \
 215           else                                                          \
 216             {                                                           \
 217               if (bytes_in_chunk == 0)                                  \
 218                 fprintf ((FILE), "\t.byte\t");                          \
 219               else                                                      \
 220                 fputc (',', (FILE));                                    \
 221               fprintf ((FILE), "0x%02x", *_ascii_bytes);                \
 222               bytes_in_chunk += 5;                                      \
 223             }                                                           \
 224         }                                                               \
 225       if (bytes_in_chunk > 0)                                           \
 226         fprintf ((FILE), "\n");                                         \
 227     }                                                                   \
 228   while (0)
 229
 230 /* This is how to output an element of a case-vector that is relative.
 231    This is only used for PIC code.  See comments by the `casesi' insn in
 232    i386.md for an explanation of the expression this outputs.
 233    PE format differs on what PC-relative offsets look like (see
 234    coff_i386_rtype_to_howto), and we need to compensate (by one word) here. */
 235
 236 #undef ASM_OUTPUT_ADDR_DIFF_ELT
 237 #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL) \
 238   fprintf (FILE, "\t.long __GLOBAL_OFFSET_TABLE_+[.-%s%d+4]\n", LPREFIX, VALUE)
 239
 240 /* Indicate that jump tables go in the text section.  This is
 241    necessary when compiling PIC code.  */
 242
 243 #define JUMP_TABLES_IN_TEXT_SECTION 1
 244
 245 /* Emit code to check the stack when allocating more that 4000
 246    bytes in one go. */
 247
 248 #define CHECK_STACK_LIMIT 0x1000
 249
 250 /* the following are OSF linker (not gld) specific... we don't want them */
 251 #undef HAS_INIT_SECTION
 252 #undef LD_INIT_SWITCH
 253 #undef LD_FINI_SWITCH
 254
 255
 256 /* The following are needed for C++, but also needed for profiling */
 257
 258 /* Support const sections and the ctors and dtors sections for g++.
 259    Note that there appears to be two different ways to support const
 260    sections at the moment.  You can either #define the symbol
 261    READONLY_DATA_SECTION (giving it some code which switches to the
 262    readonly data section) or else you can #define the symbols
 263    EXTRA_SECTIONS, EXTRA_SECTION_FUNCTIONS, SELECT_SECTION, and
 264    SELECT_RTX_SECTION.  We do both here just to be on the safe side.  */
 265
 266 #define USE_CONST_SECTION       1
 267
 268 #define CONST_SECTION_ASM_OP    ".section\t.rdata,\"r\""
 269
 270 /* Define the pseudo-ops used to switch to the .ctors and .dtors sections.
 271
 272    Note that we want to give these sections the SHF_WRITE attribute
 273    because these sections will actually contain data (i.e. tables of
 274    addresses of functions in the current root executable or shared library
 275    file) and, in the case of a shared library, the relocatable addresses
 276    will have to be properly resolved/relocated (and then written into) by
 277    the dynamic linker when it actually attaches the given shared library
 278    to the executing process.  (Note that on SVR4, you may wish to use the
 279    `-z text' option to the ELF linker, when building a shared library, as
 280    an additional check that you are doing everything right.  But if you do
 281    use the `-z text' option when building a shared library, you will get
 282    errors unless the .ctors and .dtors sections are marked as writable
 283    via the SHF_WRITE attribute.)  */
 284
 285 #define CTORS_SECTION_ASM_OP    ".section\t.ctors,\"x\""
 286 #define DTORS_SECTION_ASM_OP    ".section\t.dtors,\"x\""
 287
 288 /* A default list of other sections which we might be "in" at any given
 289    time.  For targets that use additional sections (e.g. .tdesc) you
 290    should override this definition in the target-specific file which
 291    includes this file.  */
 292
 293 #undef EXTRA_SECTIONS
 294 #define EXTRA_SECTIONS in_const, in_ctors, in_dtors
 295
 296 /* A default list of extra section function definitions.  For targets
 297    that use additional sections (e.g. .tdesc) you should override this
 298    definition in the target-specific file which includes this file.  */
 299
 300 #undef EXTRA_SECTION_FUNCTIONS
 301 #define EXTRA_SECTION_FUNCTIONS                                         \
 302   CONST_SECTION_FUNCTION                                                \
 303   CTORS_SECTION_FUNCTION                                                \
 304   DTORS_SECTION_FUNCTION
 305
 306 #undef READONLY_DATA_SECTION
 307 #define READONLY_DATA_SECTION() const_section ()
 308
 309 #define CONST_SECTION_FUNCTION                                          \
 310 void                                                                    \
 311 const_section ()                                                        \
 312 {                                                                       \
 313   if (!USE_CONST_SECTION)                                               \
 314     text_section();                                                     \
 315   else if (in_section != in_const)                                      \
 316     {                                                                   \
 317       fprintf (asm_out_file, "%s\n", CONST_SECTION_ASM_OP);             \
 318       in_section = in_const;                                            \
 319     }                                                                   \
 320 }
 321
 322 #define CTORS_SECTION_FUNCTION                                          \
 323 void                                                                    \
 324 ctors_section ()                                                        \
 325 {                                                                       \
 326   if (in_section != in_ctors)                                           \
 327     {                                                                   \
 328       fprintf (asm_out_file, "%s\n", CTORS_SECTION_ASM_OP);             \
 329       in_section = in_ctors;                                            \
 330     }                                                                   \
 331 }
 332
 333 #define DTORS_SECTION_FUNCTION                                          \
 334 void                                                                    \
 335 dtors_section ()                                                        \
 336 {                                                                       \
 337   if (in_section != in_dtors)                                           \
 338     {                                                                   \
 339       fprintf (asm_out_file, "%s\n", DTORS_SECTION_ASM_OP);             \
 340       in_section = in_dtors;                                            \
 341     }                                                                   \
 342 }
 343
 344 #if 0
 345 /* Currently gas chokes on this; that's not too hard to fix, but there's
 346    not a lot of impeteus to do it, either.  If it is done, gas will have
 347    to handle long section name escapes (which are defined in the COFF/PE
 348    document as /nnn where nnn is a string table index).  The benefit:
 349    section attributes and -ffunction-sections, neither of which seem to
 350    be critical. */
 351 /* gas may have been fixed? bfd was. */
 352
 353 /* Switch into a generic section.
 354    This is currently only used to support section attributes.
 355
 356    We make the section read-only and executable for a function decl,
 357    read-only for a const data decl, and writable for a non-const data decl.  */
 358 #define ASM_OUTPUT_SECTION_NAME(FILE, DECL, NAME) \
 359   fprintf (FILE, ".section\t%s,\"%s\",@progbits\n", NAME, \
 360            (DECL) && TREE_CODE (DECL) == FUNCTION_DECL ? "ax" : \
 361            (DECL) && TREE_READONLY (DECL) ? "a" : "aw")
 362 #endif
 363
 364 #define INT_ASM_OP              ".long"
 365
 366 /* The MS compilers take alignment as a number of bytes, so we do as well */
 367 #undef ASM_OUTPUT_ALIGN
 368 #define ASM_OUTPUT_ALIGN(FILE,LOG) \
 369   if ((LOG)!=0) fprintf ((FILE), "\t.balign %d\n", 1<<(LOG))
 370
 371 /* A C statement (sans semicolon) to output an element in the table of
 372    global constructors.  */
 373 #define ASM_OUTPUT_CONSTRUCTOR(FILE,NAME)                               \
 374   do {                                                                  \
 375     ctors_section ();                                                   \
 376     fprintf (FILE, "\t%s\t ", INT_ASM_OP);                              \
 377     assemble_name (FILE, NAME);                                         \
 378     fprintf (FILE, "\n");                                               \
 379   } while (0)
 380
 381 /* A C statement (sans semicolon) to output an element in the table of
 382    global destructors.  */
 383 #define ASM_OUTPUT_DESTRUCTOR(FILE,NAME)                                \
 384   do {                                                                  \
 385     dtors_section ();                                                   \
 386     fprintf (FILE, "\t%s\t ", INT_ASM_OP);                              \
 387     assemble_name (FILE, NAME);                                         \
 388     fprintf (FILE, "\n");                                               \
 389   } while (0)
 390
 391 /* The linker will take care of this, and having them causes problems with
 392    ld -r (specifically -rU). */
 393 #define CTOR_LISTS_DEFINED_EXTERNALLY 1
 394
 395 #define SET_ASM_OP      ".set"
 396 /* Output a definition (implements alias) */
 397 #define ASM_OUTPUT_DEF(FILE,LABEL1,LABEL2)                              \
 398 do                                                                      \
 399 {                                                                       \
 400     fprintf ((FILE), "\t%s\t", SET_ASM_OP);                             \
 401     assemble_name (FILE, LABEL1);                                       \
 402     fprintf (FILE, ",");                                                \
 403     assemble_name (FILE, LABEL2);                                       \
 404     fprintf (FILE, "\n");                                               \
 405     }                                                                   \
 406 while (0)
 407
 408 #define HOST_PTR_PRINTF "%p"
 409 #define HOST_PTR_AS_INT unsigned long
 410
 411 #define PCC_BITFIELD_TYPE_MATTERS 1
 412 #define PCC_BITFIELD_TYPE_TEST TYPE_NATIVE(rec)
 413 #define GROUP_BITFIELDS_BY_ALIGN TYPE_NATIVE(rec)
 414
 415 /* The following two flags are usually "off" for i386, because some non-gnu
 416    tools (for the i386) don't handle them.  However, we don't have that
 417    problem, so.... */
 418
 419 /* Forward references to tags are allowed.  */
 420 #define SDB_ALLOW_FORWARD_REFERENCES
 421
 422 /* Unknown tags are also allowed.  */
 423 #define SDB_ALLOW_UNKNOWN_REFERENCES
 424
 425 /* The integer half of this list needs to be constant.  However, there's
 426    a lot of disagreement about what the floating point adjustments should
 427    be.  We pick one that works with gdb.  (The underlying problem is
 428    what to do about the segment registers.  Since we have access to them
 429    from /proc, we'll allow them to be accessed in gdb, even tho the
 430    gcc compiler can't generate them.  (There's some evidence that
 431    MSVC does, but possibly only for certain special "canned" sequences.) */
 432
 433 #undef DBX_REGISTER_NUMBER
 434 #define DBX_REGISTER_NUMBER(n) \
 435 ((n) == 0 ? 0 \
 436  : (n) == 1 ? 2 \
 437  : (n) == 2 ? 1 \
 438  : (n) == 3 ? 3 \
 439  : (n) == 4 ? 6 \
 440  : (n) == 5 ? 7 \
 441  : (n) == 6 ? 5 \
 442  : (n) == 7 ? 4 \
 443  : ((n) >= FIRST_STACK_REG && (n) <= LAST_STACK_REG) ? (n)+8 \
 444  : (-1))
 445
 446 /* Define this macro if references to a symbol must be treated
 447    differently depending on something about the variable or
 448    function named by the symbol (such as what section it is in).
 449
 450    Apply stddef, handle (as yet unimplemented) pic.
 451
 452    stddef renaming does NOT apply to Alpha. */
 453
 454 char *gen_stdcall_suffix ();
 455
 456 #undef ENCODE_SECTION_INFO
 457 #define ENCODE_SECTION_INFO(DECL)                                       \
 458 do                                                                      \
 459   {                                                                     \
 460     if (flag_pic)                                                       \
 461       {                                                                 \
 462         rtx rtl = (TREE_CODE_CLASS (TREE_CODE (DECL)) != 'd'            \
 463                    ? TREE_CST_RTL (DECL) : DECL_RTL (DECL));            \
 464         SYMBOL_REF_FLAG (XEXP (rtl, 0))                                 \
 465           = (TREE_CODE_CLASS (TREE_CODE (DECL)) != 'd'                  \
 466              || ! TREE_PUBLIC (DECL));                                  \
 467       }                                                                 \
 468     if (TREE_CODE (DECL) == FUNCTION_DECL)                              \
 469       if (lookup_attribute ("stdcall",                                  \
 470                             TYPE_ATTRIBUTES (TREE_TYPE (DECL))))        \
 471         XEXP (DECL_RTL (DECL), 0) =                                     \
 472           gen_rtx (SYMBOL_REF, Pmode, gen_stdcall_suffix (DECL));       \
 473   }                                                                     \
 474 while (0)
 475
 476 /* This macro gets just the user-specified name
 477    out of the string in a SYMBOL_REF.  Discard
 478    trailing @[NUM] encoded by ENCODE_SECTION_INFO.  */
 479 #undef  STRIP_NAME_ENCODING
 480 #define STRIP_NAME_ENCODING(VAR,SYMBOL_NAME)                            \
 481 do {                                                                    \
 482   const char *_p;                                                       \
 483   const char *_name = SYMBOL_NAME;                                      \
 484   for (_p = _name; *_p && *_p != '@'; ++_p)                             \
 485     ;                                                                   \
 486   if (*_p == '@')                                                       \
 487     {                                                                   \
 488       int _len = _p - _name;                                            \
 489       _new_name = (char *) alloca (_len + 1);                           \
 490       strncpy (_new_name, _name, _len);                                 \
 491       _new_name[_len] = '\0';                                           \
 492       (VAR) = _new_name;                                                \
 493     }                                                                   \
 494   else                                                                  \
 495     (VAR) = _name;                                                      \
 496 } while (0)
 497
 498 #if 0
 499 /* Turn this back on when the linker is updated to handle grouped
 500    .data$ sections correctly. See corresponding note in i386/interix.c.
 501    MK. */
 502
 503 /* Define this macro if in some cases global symbols from one translation
 504    unit may not be bound to undefined symbols in another translation unit
 505    without user intervention.  For instance, under Microsoft Windows
 506    symbols must be explicitly imported from shared libraries (DLLs).  */
 507 #define MULTIPLE_SYMBOL_SPACES
 508
 509 #define UNIQUE_SECTION_P(DECL) DECL_ONE_ONLY (DECL)
 510 extern void i386_pe_unique_section ();
 511 #define UNIQUE_SECTION(DECL,RELOC) i386_pe_unique_section (DECL, RELOC)
 512
 513 #define SUPPORTS_ONE_ONLY 1
 514
 515 /* A C statement to output something to the assembler file to switch to section
 516    NAME for object DECL which is either a FUNCTION_DECL, a VAR_DECL or
 517    NULL_TREE.  Some target formats do not support arbitrary sections.  Do not
 518    define this macro in such cases.  */
 519 #undef ASM_OUTPUT_SECTION_NAME
 520 #define ASM_OUTPUT_SECTION_NAME(STREAM, DECL, NAME, RELOC)              \
 521 do {                                                                    \
 522   static struct section_info                                            \
 523     {                                                                   \
 524       struct section_info *next;                                        \
 525       char *name;                                                       \
 526       enum sect_enum {SECT_RW, SECT_RO, SECT_EXEC} type;                \
 527     } *sections;                                                        \
 528   struct section_info *s;                                               \
 529   const char *mode;                                                     \
 530   enum sect_enum type;                                                  \
 531                                                                         \
 532   for (s = sections; s; s = s->next)                                    \
 533     if (!strcmp (NAME, s->name))                                        \
 534       break;                                                            \
 535                                                                         \
 536   if (DECL && TREE_CODE (DECL) == FUNCTION_DECL)                        \
 537     type = SECT_EXEC, mode = "x";                                       \
 538   else if (DECL && DECL_READONLY_SECTION (DECL, RELOC))                 \
 539     type = SECT_RO, mode = "r";                                         \
 540   else                                                                  \
 541     type = SECT_RW, mode = "w";                                         \
 542                                                                         \
 543   if (s == 0)                                                           \
 544     {                                                                   \
 545       s = (struct section_info *) xmalloc (sizeof (struct section_info)); \
 546       s->name = xmalloc ((strlen (NAME) + 1) * sizeof (*NAME));         \
 547       strcpy (s->name, NAME);                                           \
 548       s->type = type;                                                   \
 549       s->next = sections;                                               \
 550       sections = s;                                                     \
 551       fprintf (STREAM, ".section\t%s,\"%s\"\n", NAME, mode);            \
 552       /* Functions may have been compiled at various levels of          \
 553          optimization so we can't use `same_size' here.  Instead,       \
 554          have the linker pick one.  */                                  \
 555       if ((DECL) && DECL_ONE_ONLY (DECL))                               \
 556         fprintf (STREAM, "\t.linkonce %s\n",                            \
 557                  TREE_CODE (DECL) == FUNCTION_DECL                      \
 558                  ? "discard" : "same_size");                            \
 559     }                                                                   \
 560   else                                                                  \
 561     {                                                                   \
 562       fprintf (STREAM, ".section\t%s,\"%s\"\n", NAME, mode);            \
 563     }                                                                   \
 564 } while (0)
 565
 566 #endif /* 0 */
 567
 568 /* DWARF2 Unwinding doesn't work with exception handling yet. */
 569 #define DWARF2_UNWIND_INFO 0
 570
 571 /* Don't assume anything about the header files. */
 572 #define NO_IMPLICIT_EXTERN_C
 573