2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>
[official-gcc.git] / gcc / config / sparc / pbd.h
blobe9344a0d9c74eaa865c3cc433d90bdf39328259c
1 /* Definitions of target machine for GNU compiler, Citicorp/TTI Unicom PBD
2 version (using GAS and COFF (encapsulated is unacceptable) )
3 Copyright (C) 1990, 1996, 2000 Free Software Foundation, Inc.
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
10 any later version.
12 GCC is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING. If not, write to
19 the Free Software Foundation, 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
22 /* Target OS builtins. */
23 #define TARGET_OS_CPP_BUILTINS() \
24 do \
25 { \
26 builtin_define_std ("unix"); \
27 builtin_define_std ("UnicomPBD"); \
28 builtin_assert ("system=unix"); \
29 } \
30 while (0)
32 /* We want DBX format for use with gdb under COFF. */
34 #define DBX_DEBUGGING_INFO 1
36 /* Generate calls to memcpy, memcmp and memset. */
38 #define TARGET_MEM_FUNCTIONS
40 /* we use /lib/libp/lib* when profiling */
42 #undef LIB_SPEC
43 #define LIB_SPEC "%{p:-L/usr/lib/libp} %{pg:-L/usr/lib/libp} -lc"
46 /* Use crt1.o as a startup file and crtn.o as a closing file. */
48 * The loader directive file gcc.ifile defines how to merge the constructor
49 * sections into the data section. Also, since gas only puts out those
50 * sections in response to N_SETT stabs, and does not (yet) have a
51 * ".sections" directive, gcc.ifile also defines the list symbols
52 * __DTOR_LIST__ and __CTOR_LIST__.
54 * Finally, we must explicitly specify the file from libgcc.a that defines
55 * exit(), otherwise if the user specifies (for example) "-lc_s" on the
56 * command line, the wrong exit() will be used and global destructors will
57 * not get called .
60 #define STARTFILE_SPEC \
61 "%{!r: gcc.ifile%s} %{pg:gcrt1.o%s}%{!pg:%{p:mcrt1.o%s}%{!p:crt1.o%s}} \
62 %{!r:_exit.o%s}"
64 #define ENDFILE_SPEC "crtn.o%s"
66 /* LINK_SPEC is needed only for SunOS 4. */
68 #undef LINK_SPEC
70 /* Although the gas we use can create .ctor and .dtor sections from N_SETT
71 stabs, it does not support section directives, so we need to have the loader
72 define the lists.
74 #define CTOR_LISTS_DEFINED_EXTERNALLY
76 /* similar to default, but allows for the table defined by ld with gcc.ifile.
77 nptrs is always 0. So we need to instead check that __DTOR_LIST__[1] != 0.
78 The old check is left in so that the same macro can be used if and when
79 a future version of gas does support section directives. */
81 #define DO_GLOBAL_DTORS_BODY {int nptrs = *(int *)__DTOR_LIST__; int i; \
82 if (nptrs == -1 || (__DTOR_LIST__[0] == 0 && __DTOR_LIST__[1] != 0)) \
83 for (nptrs = 0; __DTOR_LIST__[nptrs + 1] != 0; nptrs++); \
84 for (i = nptrs; i >= 1; i--) \
85 __DTOR_LIST__[i] (); }
87 /*
88 * Here is an example gcc.ifile. I've tested it on PBD sparc
89 * systems. The NEXT(0x200000) works on just about all 386 and m68k systems,
90 * but can be reduced to any power of 2 that is >= NBPS (0x40000 on a pbd).
92 SECTIONS {
93 .text BIND(0x41000200) BLOCK (0x200) :
94 { *(.init) *(.text) vfork = fork; *(.fini) }
96 GROUP BIND( NEXT(0x200000) + ADDR(.text) + SIZEOF(.text)):
97 { .data : { __CTOR_LIST__ = . ; . += 4; *(.ctor) . += 4 ;
98 __DTOR_LIST__ = . ; . += 4; *(.dtor) . += 4 ; }
99 .bss : { }
104 /* The prefix to add to user-visible assembler symbols. */
106 #undef USER_LABEL_PREFIX
107 #define USER_LABEL_PREFIX ""
109 /* fixes: */
111 * Internal labels are prefixed with a period.
114 #undef LOCAL_LABEL_PREFIX
115 #define LOCAL_LABEL_PREFIX "."
117 /* This is how to store into the string LABEL
118 the symbol_ref name of an internal numbered label where
119 PREFIX is the class of label and NUM is the number within the class.
120 This is suitable for output with `assemble_name'. */
122 #undef ASM_GENERATE_INTERNAL_LABEL
123 #define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM) \
124 sprintf (LABEL, "*.%s%ld", PREFIX, (long)(NUM))
126 /* This is how to output an element of a case-vector that is relative. */
128 #undef ASM_OUTPUT_ADDR_DIFF_ELT
129 #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL) \
130 fprintf (FILE, "\t.word .L%d-.L%d\n", VALUE, REL)
132 /* This is how to output an element of a case-vector that is absolute.
133 (The 68000 does not use such vectors,
134 but we must define this macro anyway.) */
136 #undef ASM_OUTPUT_ADDR_VEC_ELT
137 #define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE) \
138 fprintf (FILE, "\t.word .L%d\n", VALUE)
140 /* This is needed for SunOS 4.0, and should not hurt for 3.2
141 versions either. */
142 #undef ASM_OUTPUT_SOURCE_LINE
143 #define ASM_OUTPUT_SOURCE_LINE(file, line, counter) \
144 fprintf (file, ".stabn 68,0,%d,.LM%d\n.LM%d:\n", \
145 line, counter, counter)
147 #define ASM_INT_OP "\t.long "