OSDN Git Service

* defaults.h (ASM_OUTPUT_TYPE_DIRECTIVE, ASM_OUTPUT_SIZE_DIRECTIVE,
[pf3gnuchains/gcc-fork.git] / gcc / config / i386 / sco5.h
1 /* Definitions for Intel 386 running SCO Unix System V 3.2 Version 5.
2    Copyright (C) 1992, 1995, 1996, 1997, 1998, 1999, 2000, 2002
3    Free Software Foundation, Inc.
4    Contributed by Kean Johnston (hug@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, 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA.  */
22
23 #define TARGET_VERSION fprintf (stderr, " (i386, SCO OpenServer 5 Syntax)");
24
25 #undef LPREFIX
26 #define LPREFIX                         ".L"
27
28 #undef ALIGN_ASM_OP
29 #define ALIGN_ASM_OP                    "\t.align\t"
30
31 #undef ASCII_DATA_ASM_OP
32 #define ASCII_DATA_ASM_OP               "\t.ascii\t"
33
34 #undef IDENT_ASM_OP
35 #define IDENT_ASM_OP                    "\t.ident\t"
36
37 #undef COMMON_ASM_OP
38 #define COMMON_ASM_OP                   "\t.comm\t"
39
40 #undef SET_ASM_OP
41 #define SET_ASM_OP                      "\t.set\t"
42
43 #undef LOCAL_ASM_OP
44 #define LOCAL_ASM_OP                    "\t.local\t"
45
46 #undef ASM_SHORT
47 #define ASM_SHORT                       "\t.value\t"
48
49 #undef ASM_LONG
50 #define ASM_LONG                        "\t.long\t"
51
52 #undef ASM_QUAD
53
54 #undef TYPE_ASM_OP
55 #define TYPE_ASM_OP                     "\t.type\t"
56
57 #undef SIZE_ASM_OP
58 #define SIZE_ASM_OP                     "\t.size\t"
59
60 #undef STRING_ASM_OP
61 #define STRING_ASM_OP                   "\t.string\t"
62
63 #undef SKIP_ASM_OP
64 #define SKIP_ASM_OP                     "\t.zero\t"
65
66 #undef GLOBAL_ASM_OP
67 #define GLOBAL_ASM_OP                   "\t.globl\t"
68
69 #undef EH_FRAME_SECTION_ASM_OP
70 #define EH_FRAME_SECTION_NAME_COFF      ".ehfram"
71 #define EH_FRAME_SECTION_NAME_ELF       ".eh_frame"
72 #define EH_FRAME_SECTION_NAME   \
73   ((TARGET_ELF) ? EH_FRAME_SECTION_NAME_ELF : EH_FRAME_SECTION_NAME_COFF)
74
75 /* Avoid problems (long sectino names, forward assembler refs) with DWARF
76    exception unwinding when we're generating COFF */
77 #define DWARF2_UNWIND_INFO      \
78   ((TARGET_ELF) ? 1 : 0 )  
79
80 #undef READONLY_DATA_SECTION_ASM_OP
81 #define READONLY_DATA_SECTION_ASM_OP_COFF       "\t.section\t.rodata, \"x\""
82 #define READONLY_DATA_SECTION_ASM_OP_ELF        "\t.section\t.rodata"
83 #define READONLY_DATA_SECTION_ASM_OP            \
84   ((TARGET_ELF)                                 \
85    ? READONLY_DATA_SECTION_ASM_OP_ELF           \
86    : READONLY_DATA_SECTION_ASM_OP_COFF)
87
88 #undef INIT_SECTION_ASM_OP
89 #define INIT_SECTION_ASM_OP_ELF         "\t.section\t.init"
90 /* Rename these for COFF because crt1.o will try to run them.  */
91 #define INIT_SECTION_ASM_OP_COFF        "\t.section\t.ctor ,\"x\""
92 #define INIT_SECTION_ASM_OP     \
93   ((TARGET_ELF) ? INIT_SECTION_ASM_OP_ELF : INIT_SECTION_ASM_OP_COFF)
94
95 #undef CTORS_SECTION_ASM_OP
96 #define CTORS_SECTION_ASM_OP_ELF        "\t.section\t.ctors,\"aw\""
97 #define CTORS_SECTION_ASM_OP_COFF       INIT_SECTION_ASM_OP_COFF
98 #define CTORS_SECTION_ASM_OP    \
99  ((TARGET_ELF) ? CTORS_SECTION_ASM_OP_ELF : CTORS_SECTION_ASM_OP_COFF)
100
101 #undef DTORS_SECTION_ASM_OP
102 #define DTORS_SECTION_ASM_OP_ELF        "\t.section\t.dtors, \"aw\""
103 #define DTORS_SECTION_ASM_OP_COFF       FINI_SECTION_ASM_OP_COFF
104 #define DTORS_SECTION_ASM_OP    \
105  ((TARGET_ELF) ? DTORS_SECTION_ASM_OP_ELF : DTORS_SECTION_ASM_OP_COFF)
106
107 #undef FINI_SECTION_ASM_OP
108 #define FINI_SECTION_ASM_OP_ELF         "\t.section\t.fini"
109 #define FINI_SECTION_ASM_OP_COFF        "\t.section\t.dtor, \"x\""
110 #define FINI_SECTION_ASM_OP     \
111  ((TARGET_ELF) ? FINI_SECTION_ASM_OP_ELF : FINI_SECTION_ASM_OP_COFF)
112
113 #undef BSS_SECTION_ASM_OP
114 #define BSS_SECTION_ASM_OP              "\t.data"
115
116 #undef TEXT_SECTION_ASM_OP
117 #define TEXT_SECTION_ASM_OP             "\t.text"
118
119 #undef DATA_SECTION_ASM_OP
120 #define DATA_SECTION_ASM_OP             "\t.data"
121
122 #undef TYPE_OPERAND_FMT
123 #define TYPE_OPERAND_FMT                "@%s"
124
125 #undef APPLY_RESULT_SIZE
126 #define APPLY_RESULT_SIZE                                               \
127 (TARGET_ELF) ? size : 116
128
129 #ifndef ASM_DECLARE_RESULT
130 #define ASM_DECLARE_RESULT(FILE, RESULT)
131 #endif
132
133 #define SCO_DEFAULT_ASM_COFF(FILE,NAME)                                 \
134 do {                                                                    \
135       ASM_OUTPUT_LABEL (FILE, NAME);                                    \
136   } while (0)
137
138 #undef ASM_DECLARE_FUNCTION_NAME
139 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)                     \
140   do {                                                                  \
141     if (TARGET_ELF) {                                                   \
142       ASM_OUTPUT_TYPE_DIRECTIVE (FILE, NAME, "function");               \
143       ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL));                    \
144       ASM_OUTPUT_LABEL (FILE, NAME);                                    \
145     } else                                                              \
146       SCO_DEFAULT_ASM_COFF(FILE, NAME);                                 \
147 } while (0)
148
149 #undef ASM_DECLARE_FUNCTION_SIZE
150 #define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL)                    \
151   do {                                                                  \
152     if (TARGET_ELF && !flag_inhibit_size_directive)                     \
153       ASM_OUTPUT_MEASURED_SIZE (FILE, (FNAME), ".");                    \
154   } while (0)
155
156 #undef ASM_DECLARE_OBJECT_NAME
157 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL)                       \
158   do {                                                                  \
159     if (TARGET_ELF) {                                                   \
160       HOST_WIDE_INT size;                                               \
161                                                                         \
162       ASM_OUTPUT_TYPE_DIRECTIVE (FILE, NAME, "object");                 \
163                                                                         \
164       size_directive_output = 0;                                        \
165       if (!flag_inhibit_size_directive                                  \
166           && (DECL) && DECL_SIZE (DECL))                                \
167         {                                                               \
168           size_directive_output = 1;                                    \
169           size = int_size_in_bytes (TREE_TYPE (DECL));                  \
170           ASM_OUTPUT_SIZE_DIRECTIVE (FILE, NAME, size);                 \
171         }                                                               \
172                                                                         \
173       ASM_OUTPUT_LABEL (FILE, NAME);                                    \
174     } else                                                              \
175       SCO_DEFAULT_ASM_COFF(FILE, NAME);                                 \
176   } while (0)
177
178 #undef ASM_FILE_START_1
179 #define ASM_FILE_START_1(FILE)
180
181 #undef ASM_FILE_START
182 #define ASM_FILE_START(FILE)                                            \
183 do {                                                                    \
184   output_file_directive((FILE),main_input_filename);                    \
185   fprintf ((FILE), "\t.version\t\"01.01\"\n");                          \
186 } while (0)
187
188 #undef ASM_FINISH_DECLARE_OBJECT
189 #define ASM_FINISH_DECLARE_OBJECT(FILE, DECL, TOP_LEVEL, AT_END)         \
190 do {                                                                     \
191   if (TARGET_ELF) {                                                      \
192      const char *name = XSTR (XEXP (DECL_RTL (DECL), 0), 0);             \
193      HOST_WIDE_INT size;                                                 \
194      if (!flag_inhibit_size_directive && DECL_SIZE (DECL)                \
195          && ! AT_END && TOP_LEVEL                                        \
196          && DECL_INITIAL (DECL) == error_mark_node                       \
197          && !size_directive_output)                                      \
198        {                                                                 \
199          size_directive_output = 1;                                      \
200          size = int_size_in_bytes (TREE_TYPE (DECL));                    \
201          ASM_OUTPUT_SIZE_DIRECTIVE (FILE, name, size);                   \
202        }                                                                 \
203     }                                                                    \
204 } while (0)
205
206 #undef ASM_GENERATE_INTERNAL_LABEL
207 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM)                 \
208 do {                                                                    \
209   if (TARGET_ELF)                                                       \
210     sprintf (LABEL, "*.%s%ld", (PREFIX), (long)(NUM));                  \
211   else                                                                  \
212     sprintf (LABEL, ".%s%ld", (PREFIX), (long)(NUM));                   \
213 } while (0)
214
215 #undef ASM_OUTPUT_ALIGNED_COMMON
216 #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN)              \
217 do {                                                                    \
218   fprintf ((FILE), "%s", COMMON_ASM_OP);                                \
219   assemble_name ((FILE), (NAME));                                       \
220   if (TARGET_ELF)                                                       \
221     fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT);      \
222   else                                                                  \
223     fprintf ((FILE), ",%u\n", (SIZE));                                  \
224 } while (0)
225
226 #undef ASM_OUTPUT_ALIGNED_LOCAL
227 #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN)               \
228 do {                                                                    \
229   if (TARGET_ELF) {                                                     \
230     fprintf ((FILE), "%s", LOCAL_ASM_OP);                               \
231     assemble_name ((FILE), (NAME));                                     \
232     fprintf ((FILE), "\n");                                             \
233     ASM_OUTPUT_ALIGNED_COMMON (FILE, NAME, SIZE, ALIGN);                \
234   } else {                                                              \
235     int align = exact_log2 (ALIGN);                                     \
236     if (align > 2) align = 2;                                           \
237     if (TARGET_SVR3_SHLIB)                                              \
238       data_section ();                                                  \
239     else                                                                \
240       bss_section ();                                                   \
241     ASM_OUTPUT_ALIGN ((FILE), align == -1 ? 2 : align);                 \
242     fprintf ((FILE), "%s\t", "\t.lcomm");                               \
243     assemble_name ((FILE), (NAME));                                     \
244     fprintf ((FILE), ",%u\n", (SIZE));                                  \
245    }                                                                    \
246 } while (0)
247
248 /* A C statement (sans semicolon) to output to the stdio stream
249    FILE the assembler definition of uninitialized global DECL named
250    NAME whose size is SIZE bytes and alignment is ALIGN bytes.
251    Try to use asm_output_aligned_bss to implement this macro.  */
252
253 #define ASM_OUTPUT_ALIGNED_BSS(FILE, DECL, NAME, SIZE, ALIGN) \
254 asm_output_aligned_bss (FILE, DECL, NAME, SIZE, ALIGN)
255
256 #undef ESCAPES
257 #define ESCAPES \
258 "\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\
259 \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\
260 \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\
261 \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\
262 \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\
263 \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\
264 \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\
265 \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"
266
267 #undef STRING_LIMIT
268 #define STRING_LIMIT    ((unsigned) 256)
269
270 #undef ASM_OUTPUT_LIMITED_STRING
271 #define ASM_OUTPUT_LIMITED_STRING(FILE, STR)                            \
272   do                                                                    \
273     {                                                                   \
274       register const unsigned char *_limited_str =                      \
275         (const unsigned char *) (STR);                                  \
276       register unsigned ch;                                             \
277       fprintf ((FILE), "%s\"", STRING_ASM_OP);                          \
278       for (; (ch = *_limited_str); _limited_str++)                      \
279         {                                                               \
280           register int escape;                                          \
281           switch (escape = ESCAPES[ch])                                 \
282             {                                                           \
283             case 0:                                                     \
284               putc (ch, (FILE));                                        \
285               break;                                                    \
286             case 1:                                                     \
287               fprintf ((FILE), "\\%03o", ch);                           \
288               break;                                                    \
289             default:                                                    \
290               putc ('\\', (FILE));                                      \
291               putc (escape, (FILE));                                    \
292               break;                                                    \
293             }                                                           \
294         }                                                               \
295       fprintf ((FILE), "\"\n");                                         \
296     }                                                                   \
297   while (0)
298
299
300 #undef ASM_OUTPUT_ASCII
301 #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH)                             \
302 do {                                                                    \
303       register const unsigned char *_ascii_bytes =                      \
304         (const unsigned char *) (STR);                                  \
305       register const unsigned char *limit = _ascii_bytes + (LENGTH);    \
306       register unsigned bytes_in_chunk = 0;                             \
307       for (; _ascii_bytes < limit; _ascii_bytes++)                      \
308         {                                                               \
309           register unsigned const char *p;                              \
310           if (bytes_in_chunk >= 64)                                     \
311             {                                                           \
312               fputc ('\n', (FILE));                                     \
313               bytes_in_chunk = 0;                                       \
314             }                                                           \
315           for (p = _ascii_bytes; p < limit && *p != '\0'; p++)          \
316             continue;                                                   \
317           if (p < limit && (p - _ascii_bytes) <= (long) STRING_LIMIT)   \
318             {                                                           \
319               if (bytes_in_chunk > 0)                                   \
320                 {                                                       \
321                   fputc ('\n', (FILE));                                 \
322                   bytes_in_chunk = 0;                                   \
323                 }                                                       \
324               ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes);         \
325               _ascii_bytes = p;                                         \
326             }                                                           \
327           else                                                          \
328             {                                                           \
329               if (bytes_in_chunk == 0)                                  \
330                 fputs ("\t.byte\t", (FILE));                            \
331               else                                                      \
332                 fputc (',', (FILE));                                    \
333               fprintf ((FILE), "0x%02x", *_ascii_bytes);                \
334               bytes_in_chunk += 5;                                      \
335             }                                                           \
336         }                                                               \
337       if (bytes_in_chunk > 0)                                           \
338         fprintf ((FILE), "\n");                                         \
339 } while (0) 
340
341 #undef ASM_OUTPUT_CASE_LABEL
342 #define ASM_OUTPUT_CASE_LABEL(FILE,PREFIX,NUM,JUMPTABLE)                \
343 do {                                                                    \
344   if (TARGET_ELF)                                                       \
345     ASM_OUTPUT_ALIGN ((FILE), 2);                                       \
346   ASM_OUTPUT_INTERNAL_LABEL((FILE),(PREFIX),(NUM));                     \
347 } while (0)
348
349 #undef ASM_OUTPUT_IDENT
350 #define ASM_OUTPUT_IDENT(FILE, NAME) \
351   fprintf (FILE, "%s\"%s\"\n", IDENT_ASM_OP, NAME);
352
353 #undef ASM_GLOBALIZE_LABEL
354 #define ASM_GLOBALIZE_LABEL(FILE,NAME)  \
355   (fprintf ((FILE), "%s", GLOBAL_ASM_OP), assemble_name (FILE, NAME), fputs ("\n", FILE))
356
357 #undef ASM_OUTPUT_EXTERNAL_LIBCALL
358 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN)                          \
359   if (TARGET_ELF) ASM_GLOBALIZE_LABEL (FILE, XSTR (FUN, 0))
360
361 #undef ASM_OUTPUT_INTERNAL_LABEL
362 #define ASM_OUTPUT_INTERNAL_LABEL(FILE,PREFIX,NUM)                      \
363   fprintf (FILE, ".%s%d:\n", PREFIX, NUM)
364
365 /* The prefix to add to user-visible assembler symbols.  */
366
367 #undef USER_LABEL_PREFIX
368 #define USER_LABEL_PREFIX ""
369
370 /* 
371  * We rename 'gcc_except_table' to the shorter name in preparation
372  * for the day when we're ready to do DWARF2 eh unwinding under COFF.
373  */
374 /* #define EXCEPTION_SECTION()          named_section (NULL, ".gccexc", 1) */
375
376 /* Switch into a generic section.  */
377 #define TARGET_ASM_NAMED_SECTION default_elf_asm_named_section 
378
379 #undef ASM_OUTPUT_SKIP
380 #define ASM_OUTPUT_SKIP(FILE,SIZE) \
381 do {                                                                    \
382   if (TARGET_ELF)                                                       \
383     fprintf (FILE, "%s%u\n", SKIP_ASM_OP, (SIZE));                      \
384   else                                                                  \
385     fprintf ((FILE), "%s.,.+%u\n", SET_ASM_OP, (SIZE));         \
386 } while (0)
387
388
389 #undef CTOR_LIST_BEGIN
390 #define CTOR_LIST_BEGIN                                                 \
391 do {                                                                    \
392   asm (CTORS_SECTION_ASM_OP);                                           \
393   if (TARGET_ELF)                                                       \
394     STATIC func_ptr __CTOR_LIST__[1] = { (func_ptr) (-1) };             \
395   else                                                                  \
396     asm ("pushl $0");                                                   \
397 } while (0)
398
399 #undef CTOR_LIST_END
400 #define CTOR_LIST_END                                                   \
401 do {                                                                    \
402   if (TARGET_ELF) {                                                     \
403     asm (CTORS_SECTION_ASM_OP);                                         \
404     STATIC func_ptr __CTOR_LIST__[1] = { (func_ptr) (0) };              \
405   } else {                                                              \
406     CTOR_LIST_BEGIN;                                                    \
407   }                                                                     \
408 } while (0)
409
410 #undef DBX_BLOCKS_FUNCTION_RELATIVE
411 #define DBX_BLOCKS_FUNCTION_RELATIVE 1
412
413 #undef DBX_FUNCTION_FIRST
414 #define DBX_FUNCTION_FIRST 1
415
416 #undef DBX_REGISTER_NUMBER
417 #define DBX_REGISTER_NUMBER(n) \
418   ((TARGET_ELF) ? svr4_dbx_register_map[n] : dbx_register_map[n])
419
420 #undef DWARF2_DEBUGGING_INFO
421 #undef DWARF_DEBUGGING_INFO
422 #undef SDB_DEBUGGING_INFO
423 #undef DBX_DEBUGGING_INFO
424 #undef PREFERRED_DEBUGGING_TYPE
425
426 #define DWARF2_DEBUGGING_INFO 1
427 #define DWARF_DEBUGGING_INFO 1
428 #define SDB_DEBUGGING_INFO   1
429 #define DBX_DEBUGGING_INFO   1
430 #define PREFERRED_DEBUGGING_TYPE                                        \
431   ((TARGET_ELF) ? DWARF2_DEBUG: SDB_DEBUG)
432
433 #undef EXTRA_SECTIONS
434 #define EXTRA_SECTIONS in_init, in_fini
435
436 #undef EXTRA_SECTION_FUNCTIONS
437 #define EXTRA_SECTION_FUNCTIONS                                         \
438   INIT_SECTION_FUNCTION                                                 \
439   FINI_SECTION_FUNCTION
440
441 #undef FINI_SECTION_FUNCTION
442 #define FINI_SECTION_FUNCTION                                           \
443 void                                                                    \
444 fini_section ()                                                         \
445 {                                                                       \
446   if ((!TARGET_ELF) && in_section != in_fini)                           \
447     {                                                                   \
448       fprintf (asm_out_file, "%s\n", FINI_SECTION_ASM_OP);              \
449       in_section = in_fini;                                             \
450     }                                                                   \
451 }
452
453 #undef INIT_SECTION_FUNCTION
454 #define INIT_SECTION_FUNCTION                                           \
455 void                                                                    \
456 init_section ()                                                         \
457 {                                                                       \
458   if ((!TARGET_ELF) && in_section != in_init)                           \
459     {                                                                   \
460       fprintf (asm_out_file, "%s\n", INIT_SECTION_ASM_OP);              \
461       in_section = in_init;                                             \
462     }                                                                   \
463 }
464
465 #undef SUBTARGET_FRAME_POINTER_REQUIRED
466 #define SUBTARGET_FRAME_POINTER_REQUIRED                                \
467   ((TARGET_ELF) ? 0 :                                                   \
468    (current_function_calls_setjmp || current_function_calls_longjmp))
469
470 #undef LOCAL_LABEL_PREFIX
471 #define LOCAL_LABEL_PREFIX                                              \
472  ((TARGET_ELF) ? "" : ".")
473
474 #undef MD_EXEC_PREFIX
475 #undef MD_STARTFILE_PREFIX
476 #define MD_EXEC_PREFIX "/usr/ccs/bin/"
477 #define MD_STARTFILE_PREFIX "/usr/ccs/lib/"
478
479 #undef NON_SAVING_SETJMP
480 #define NON_SAVING_SETJMP                                               \
481   ((TARGET_ELF) ? 0 :                                                   \
482    (current_function_calls_setjmp && current_function_calls_longjmp))
483
484 #undef NO_IMPLICIT_EXTERN_C
485 #define NO_IMPLICIT_EXTERN_C 1
486
487 /* JKJ FIXME - examine the ramifications of RETURN_IN_MEMORY and
488    RETURN_POPS_ARGS */
489
490 #undef RETURN_POPS_ARGS
491 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE)                          \
492  ((TARGET_ELF) ?                                                        \
493   (ix86_return_pops_args (FUNDECL, FUNTYPE, SIZE)) :                    \
494   (((FUNDECL) && (TREE_CODE (FUNDECL) == IDENTIFIER_NODE)) ? 0          \
495    : (TARGET_RTD                                                        \
496       && (TYPE_ARG_TYPES (FUNTYPE) == 0                                 \
497           || (TREE_VALUE (tree_last (TYPE_ARG_TYPES (FUNTYPE)))         \
498               == void_type_node))) ? (SIZE)                             \
499    : 0))
500
501 /* ??? Ignore coff.  */
502 #undef  TARGET_ASM_SELECT_SECTION
503 #define TARGET_ASM_SELECT_SECTION  default_elf_select_section
504
505 #undef SWITCH_TAKES_ARG
506 #define SWITCH_TAKES_ARG(CHAR)                                          \
507   (DEFAULT_SWITCH_TAKES_ARG(CHAR)                                       \
508    || (CHAR) == 'h'                                                     \
509    || (CHAR) == 'R'                                                     \
510    || (CHAR) == 'Y'                                                     \
511    || (CHAR) == 'z')
512
513 #undef WORD_SWITCH_TAKES_ARG
514 #define WORD_SWITCH_TAKES_ARG(STR)                                      \
515  (DEFAULT_WORD_SWITCH_TAKES_ARG (STR)                                   \
516   && strcmp (STR, "Tdata") && strcmp (STR, "Ttext")                     \
517   && strcmp (STR, "Tbss"))
518
519 #undef TARGET_SUBTARGET_DEFAULT
520 #define TARGET_SUBTARGET_DEFAULT (MASK_80387 | MASK_IEEE_FP | MASK_FLOAT_RETURNS)
521
522 #undef HANDLE_SYSV_PRAGMA
523 #define HANDLE_SYSV_PRAGMA 1
524
525 /* Though OpenServer supports .weak in COFF, we don't use it.
526  * G++ will frequently emit a symol as .weak and then (in the same .s 
527  * file) declare it global.   The COFF assembler finds this unamusing.
528  */
529 #define SUPPORTS_WEAK (TARGET_ELF)
530 #define ASM_WEAKEN_LABEL(FILE,NAME) \
531   do { fputs ("\t.weak\t", FILE); assemble_name (FILE, NAME);           \
532         fputc ('\n', FILE); } while (0)
533
534 /*
535  * Define sizes and types
536  */
537 #undef SIZE_TYPE
538 #undef PTRDIFF_TYPE
539 #undef WCHAR_TYPE
540 #undef WCHAR_TYPE_SIZE
541 #undef LONG_DOUBLE_TYPE_SIZE
542 #define LONG_DOUBLE_TYPE_SIZE   96
543 #define SIZE_TYPE               "unsigned int"
544 #define PTRDIFF_TYPE            "int"
545 #define WCHAR_TYPE              "long int"
546 #define WCHAR_TYPE_SIZE         BITS_PER_WORD
547
548 /*
549  * New for multilib support. Set the default switches for multilib,
550  * which is -melf.
551  */
552 #define MULTILIB_DEFAULTS { "melf" }
553
554 \f
555 /* Please note that these specs may look messy but they are required in
556    order to emulate the SCO Development system as closely as possible.
557    With SCO Open Server 5.0, you now get the linker and assembler free,
558    so that is what these specs are targeted for. These utilities are
559    very argument sensitive: a space in the wrong place breaks everything.
560    So RMS, please forgive this mess. It works.
561
562    Parameters which can be passed to gcc, and their SCO equivalents:
563    GCC Parameter                SCO Equivalent
564    -ansi                        -a ansi
565    -posix                       -a posix
566    -Xpg4                        -a xpg4
567    -Xpg4plus                    -a xpg4plus
568    -Xods30                      -a ods30
569
570    As with SCO, the default is XPG4 plus mode. SCO also allows you to
571    specify a C dialect with -Xt, -Xa, -Xc, -Xk and -Xm. These are passed
572    on to the assembler and linker in the same way that the SCO compiler
573    does.
574
575    SCO also allows you to compile, link and generate either ELF or COFF
576    binaries. With gcc, unlike the SCO compiler, the default is ELF.
577    Specify -mcoff to gcc to produce COFF binaries. -fpic will get the
578    assembler and linker to produce PIC code.
579 */
580
581 /* Set up assembler flags for PIC and ELF compilations */
582 #undef ASM_SPEC
583
584 #if USE_GAS
585   /* Leave ASM_SPEC undefined so we pick up the master copy from gcc.c 
586    * Undef MD_EXEC_PREFIX because we don't know where GAS is, but it's not
587    * likely in /usr/ccs/bin/ 
588    */
589 #undef MD_EXEC_PREFIX 
590 #else
591
592 #define ASM_SPEC \
593    "-b %{!mcoff:elf}%{mcoff:coff \
594      %{static:%e-static not valid with -mcoff} \
595      %{shared:%e-shared not valid with -mcoff} \
596      %{symbolic:%e-symbolic not valid with -mcoff}} \
597     %{Ym,*} %{Yd,*} %{Wa,*:%*} \
598     %{!mcoff:-E%{Xa:a}%{!Xa:%{Xc:c}%{!Xc:%{Xk:k}%{!Xk:%{Xt:t}%{!Xt:a}}}},%{ansi:ansi}%{!ansi:%{posix:posix}%{!posix:%{Xpg4:xpg4}%{!Xpg4:%{Xpg4plus:XPG4PLUS}%{!Xpg4plus:%{Xods30:ods30}%{!Xods30:XPG4PLUS}}}}},ELF %{Qn:} %{!Qy:-Qn}}"
599 #endif
600
601 /* Use crt1.o as a startup file and crtn.o as a closing file.  */
602
603 #undef STARTFILE_SPEC
604 #define STARTFILE_SPEC \
605  "%{shared: %{!mcoff: crti.o%s}} \
606   %{!shared:\
607    %{!symbolic: \
608     %{pg:gcrt.o%s}%{!pg:%{p:mcrt1.o%s}%{!p:crt1.o%s}}}} \
609   %{ansi:values-Xc.o%s} \
610   %{!ansi: \
611    %{Xa:values-Xa.o%s} \
612     %{!Xa:%{Xc:values-Xc.o%s} \
613      %{!Xc:%{Xk:values-Xk.o%s} \
614       %{!Xk:%{Xt:values-Xt.o%s} \
615        %{!Xt:values-Xa.o%s}}}}} \
616   %{mcoff:crtbeginS.o%s} %{!mcoff:crtbegin.o%s}"
617
618 #undef ENDFILE_SPEC
619 #define ENDFILE_SPEC \
620  "%{!mcoff:crtend.o%s} \
621   %{mcoff:crtendS.o%s} \
622   %{pg:gcrtn.o%s}%{!pg:crtn.o%s}"
623
624 #define TARGET_OS_CPP_BUILTINS()                \
625   do                                            \
626     {                                           \
627         builtin_define ("__unix");              \
628         builtin_define ("_SCO_DS");             \
629         builtin_define ("_M_I386");             \
630         builtin_define ("_M_XENIX");            \
631         builtin_define ("_M_UNIX");             \
632         builtin_assert ("system=svr3");         \
633         if (flag_iso)                           \
634           cpp_define (pfile, "_STRICT_ANSI");   \
635         if (flag_pic)                                                   \
636           {                                                             \
637             builtin_define ("__PIC__");                                 \
638             builtin_define ("__pic__");                                 \
639           }                                                             \
640     }                                           \
641   while (0)
642
643 #undef CPP_SPEC
644 #define CPP_SPEC "\
645   %{fpic:%{mcoff:%e-fpic is not valid with -mcoff}} \
646   %{fPIC:%{mcoff:%e-fPIC is not valid with -mcoff}} \
647   %{!Xods30:-D_STRICT_NAMES} \
648   %{!ansi:%{!posix:%{!Xods30:-D_SCO_XPG_VERS=4}}} \
649   %{ansi:-isystem include/ansi%s -isystem /usr/include/ansi} \
650   %{!ansi: \
651    %{posix:-isystem include/posix%s -isystem /usr/include/posix \
652            -D_POSIX_C_SOURCE=2 -D_POSIX_SOURCE=1} \
653     %{!posix:%{Xpg4:-isystem include/xpg4%s -isystem /usr/include/xpg4 \
654                     -D_XOPEN_SOURCE=1} \
655      %{!Xpg4:-D_M_I86 -D_M_I86SM -D_M_INTERNAT -D_M_SDATA -D_M_STEXT \
656              -D_M_BITFIELDS -D_M_SYS5 -D_M_SYSV -D_M_SYSIII \
657              -D_M_WORDSWAP -Dunix -DM_I386 -DM_UNIX -DM_XENIX \
658              %{Xods30:-isystem include/ods_30_compat%s \
659                       -isystem /usr/include/ods_30_compat \
660                       -D_SCO_ODS_30 -DM_I86 -DM_I86SM -DM_SDATA -DM_STEXT \
661                       -DM_BITFIELDS -DM_SYS5 -DM_SYSV -DM_INTERNAT -DM_SYSIII \
662                       -DM_WORDSWAP}}}} \
663   %{scointl:-DM_INTERNAT -D_M_INTERNAT} \
664   %{!mcoff:-D_SCO_ELF} \
665   %{mcoff:-D_M_COFF -D_SCO_COFF} \
666   %{Xa:-D_SCO_C_DIALECT=1} \
667   %{!Xa:%{Xc:-D_SCO_C_DIALECT=3} \
668    %{!Xc:%{Xk:-D_SCO_C_DIALECT=4} \
669     %{!Xk:%{Xt:-D_SCO_C_DIALECT=2} \
670      %{!Xt:-D_SCO_C_DIALECT=1}}}}"
671
672 #undef LINK_SPEC
673 #define LINK_SPEC \
674  "-b %{!mcoff:elf}%{mcoff:coff \
675    %{static:%e-static not valid with -mcoff} \
676    %{shared:%e-shared not valid with -mcoff} \
677    %{symbolic:%e-symbolic not valid with -mcoff} \
678    %{fpic:%e-fpic not valid with -mcoff} \
679    %{fPIC:%e-fPIC not valid with -mcoff}} \
680   -R%{Xa:a}%{!Xa:%{Xc:c}%{!Xc:%{Xk:k}%{!Xk:%{Xt:t}%{!Xt:a}}}},%{ansi:ansi}%{!ansi:%{posix:posix}%{!posix:%{Xpg4:xpg4}%{!Xpg4:%{Xpg4plus:XPG4PLUS}%{!Xpg4plus:%{Xods30:ods30}%{!Xods30:XPG4PLUS}}}}},%{mcoff:COFF}%{!mcoff:ELF} \
681   %{Wl,*%*} %{YP,*} %{YL,*} %{YU,*} \
682   %{!YP,*:%{p:-YP,/usr/ccs/libp:/lib/libp:/usr/lib/libp:/usr/ccs/lib:/lib:/usr/lib} \
683    %{!p:-YP,/usr/ccs/lib:/lib:/usr/lib}} \
684   %{h*} %{static:-dn -Bstatic} %{shared:-G -dy %{!z*:-z text}} \
685   %{symbolic:-Bsymbolic -G -dy %{!z*:-z text}} %{z*} %{R*} %{Y*} \
686   %{G:-G} %{!mcoff:%{Qn:} %{!Qy:-Qn}}"
687
688 /* The SCO COFF linker gets confused on the difference between "-ofoo"
689    and "-o foo".   So we just always force a single space.  */
690
691 #define SWITCHES_NEED_SPACES "o"
692
693 /* Library spec. If we are not building a shared library, provide the
694    standard libraries, as per the SCO compiler.  */
695
696 #undef LIB_SPEC
697 #define LIB_SPEC \
698  "%{shared:pic/libgcc.a%s}%{!shared:%{!symbolic:-lcrypt -lgen -lc}}"
699
700 #undef LIBGCC_SPEC
701 #define LIBGCC_SPEC \
702  "%{!shared:-lgcc}"
703
704 #define MASK_COFF               010000000000    /* Mask for elf generation */
705 #define TARGET_ELF              (1) /* (!(target_flags & MASK_COFF)) */
706
707 #undef SUBTARGET_SWITCHES
708 #define SUBTARGET_SWITCHES                                      \
709         { "elf", -MASK_COFF, N_("Generate ELF output")  },
710
711 #define NO_DOLLAR_IN_LABEL
712
713 /* Implicit library calls should use memcpy, not bcopy, etc.  They are 
714    faster on OpenServer libraries.  */
715
716 #define TARGET_MEM_FUNCTIONS
717
718 /* Biggest alignment supported by the object file format of this
719    machine.  Use this macro to limit the alignment which can be
720    specified using the `__attribute__ ((aligned (N)))' construct.  If
721    not defined, the default value is `BIGGEST_ALIGNMENT'.  */
722
723 #define MAX_OFILE_ALIGNMENT (32768*8)
724
725 /* Define the `__builtin_va_list' type for the ABI.  On OpenServer, this
726    type is `char *'.  */
727 #undef BUILD_VA_LIST_TYPE
728 #define BUILD_VA_LIST_TYPE(VALIST) \
729   (VALIST) = build_pointer_type (char_type_node)
730
731
732 /*
733 Here comes some major hackery to get the crt stuff to compile properly.
734 Since we can (and do) compile for both COFF and ELF environments, we
735 set things up accordingly, based on the pre-processor defines for ELF
736 and COFF. This is insane, but then I guess having one compiler with a
737 single back-end supporting two vastly different file format types is
738 a little insane too. But it is not impossible and we get a useful
739 compiler at the end of the day. Onward we go ...
740 */
741
742 #if defined(CRT_BEGIN) || defined(CRT_END) || defined(IN_LIBGCC2)
743 # undef OBJECT_FORMAT_ELF
744 # undef INIT_SECTION_ASM_OP
745 # undef FINI_SECTION_ASM_OP
746 # undef CTORS_SECTION_ASM_OP
747 # undef DTORS_SECTION_ASM_OP
748 # undef EH_FRAME_SECTION_NAME
749 # undef CTOR_LIST_BEGIN
750 # undef CTOR_LIST_END
751 # undef DO_GLOBAL_CTORS_BODY
752
753 # if defined (_SCO_ELF)
754 #  define OBJECT_FORMAT_ELF
755 #  define INIT_SECTION_ASM_OP INIT_SECTION_ASM_OP_ELF
756 #  define FINI_SECTION_ASM_OP FINI_SECTION_ASM_OP_ELF
757 #  define DTORS_SECTION_ASM_OP DTORS_SECTION_ASM_OP_ELF
758 #  define CTORS_SECTION_ASM_OP CTORS_SECTION_ASM_OP_ELF
759 #  define EH_FRAME_SECTION_NAME EH_FRAME_SECTION_NAME_ELF
760 # else /* ! _SCO_ELF */
761 #  define INIT_SECTION_ASM_OP INIT_SECTION_ASM_OP_COFF
762 #  define FINI_SECTION_ASM_OP FINI_SECTION_ASM_OP_COFF
763 #  define DTORS_SECTION_ASM_OP DTORS_SECTION_ASM_OP_COFF
764 #  define CTORS_SECTION_ASM_OP CTORS_SECTION_ASM_OP_COFF
765 #  define EH_FRAME_SECTION_NAME EH_FRAME_SECTION_NAME_COFF
766 #  define CTOR_LIST_BEGIN asm (INIT_SECTION_ASM_OP); asm ("pushl $0")
767 #  define CTOR_LIST_END CTOR_LIST_BEGIN
768 #  define DO_GLOBAL_CTORS_BODY                                          \
769 do {                                                                    \
770      func_ptr *p, *beg = alloca(0);                                     \
771      for (p = beg; *p;)                                                 \
772       (*p++) ();                                                        \
773 } while (0)
774 # endif /* ! _SCO_ELF */
775 #endif /* CRT_BEGIN !! CRT_END */
776
777 /* Handle special EH pointer encodings.  Absolute, pc-relative, and
778    indirect are handled automatically.  */
779 #define ASM_MAYBE_OUTPUT_ENCODED_ADDR_RTX(FILE, ENCODING, SIZE, ADDR, DONE) \
780   do {                                                                  \
781     if ((SIZE) == 4 && ((ENCODING) & 0x70) == DW_EH_PE_datarel)         \
782       {                                                                 \
783         fputs (ASM_LONG, FILE);                                         \
784         assemble_name (FILE, XSTR (ADDR, 0));                           \
785         fputs (((ENCODING) & DW_EH_PE_indirect ? "@GOT" : "@GOTOFF"), FILE); \
786         goto DONE;                                                      \
787       }                                                                 \
788   } while (0)
789
790 /* Used by crtstuff.c to initialize the base of data-relative relocations.
791    These are GOT relative on x86, so return the pic register.  */
792 #ifdef __PIC__
793 #define CRT_GET_RFIB_DATA(BASE)                 \
794   {                                             \
795     register void *ebx_ __asm__("ebx");         \
796     BASE = ebx_;                                \
797   }
798 #else
799 #define CRT_GET_RFIB_DATA(BASE)                                         \
800   __asm__ ("call\t.LPR%=\n"                                             \
801            ".LPR%=:\n\t"                                                \
802            "popl\t%0\n\t"                                               \
803            /* Due to a GAS bug, this cannot use EAX.  That encodes      \
804               smaller than the traditional EBX, which results in the    \
805               offset being off by one.  */                              \
806            "addl\t$_GLOBAL_OFFSET_TABLE_+[.-.LPR%=],%0"                 \
807            : "=d"(BASE))
808 #endif
809
810 /* Select a format to encode pointers in exception handling data.  CODE
811    is 0 for data, 1 for code labels, 2 for function pointers.  GLOBAL is
812    true if the symbol may be affected by dynamic relocations.  */
813 #undef ASM_PREFERRED_EH_DATA_FORMAT
814 #define ASM_PREFERRED_EH_DATA_FORMAT(CODE,GLOBAL)                       \
815   (flag_pic ? (GLOBAL ? DW_EH_PE_indirect : 0) | DW_EH_PE_datarel       \
816    : DW_EH_PE_absptr)