1 /* Definitions for PA_RISC with ELF format
2 Copyright 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
4 This file is part of GNU CC.
6 GNU CC is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
11 GNU CC is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with GNU CC; see the file COPYING. If not, write to
18 the Free Software Foundation, 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
21 /* Use DWARF2 debugging info and unwind. */
22 #undef PREFERRED_DEBUGGING_TYPE
23 #define PREFERRED_DEBUGGING_TYPE DWARF2_DEBUG
24 #define DWARF2_ASM_LINE_DEBUG_INFO 1
25 #define DWARF2_UNWIND_INFO 1
28 #define CPP_PREDEFINES "-D__ELF__ -Dunix -D__hppa__ -Dlinux -Asystem=unix -Asystem=posix -Acpu=hppa -Amachine=hppa -Amachine=bigendian"
32 "%{v:-V} %{n} %{T} %{Ym,*} %{Yd,*} %{Wa,*:%*}"
34 /* Define this for shared library support because it isn't in the main
42 %{rdynamic:-export-dynamic} \
43 %{!dynamic-linker:-dynamic-linker /lib/ld.so.1}} \
46 /* Sibcalls, stubs, and elf sections don't play well. */
47 #undef FUNCTION_OK_FOR_SIBCALL
48 #define FUNCTION_OK_FOR_SIBCALL(x) 0
50 /* glibc's profiling functions don't need gcc to allocate counters. */
51 #define NO_PROFILE_COUNTERS 1
53 /* Put plabels into the data section so we can relocate them. */
54 #undef SELECT_RTX_SECTION
55 #define SELECT_RTX_SECTION(MODE,RTX,ALIGN) \
56 if (flag_pic && function_label_operand (RTX, MODE)) \
59 readonly_data_section ();
61 /* A C expression whose value is RTL representing the location of the
62 incoming return address at the beginning of any function, before the
64 #define INCOMING_RETURN_ADDR_RTX (gen_rtx_REG (word_mode, 2))
65 #define DWARF_FRAME_RETURN_COLUMN (DWARF_FRAME_REGNUM (2))
67 /* Define the strings used for the special svr4 .type and .size directives.
68 These strings generally do not vary from one system running svr4 to
69 another, but if a given system (e.g. m88k running svr) needs to use
70 different pseudo-op names for these, they may be overridden in the
71 file which includes this one. */
74 #define STRING_ASM_OP ".stringz"
76 #define TEXT_SECTION_ASM_OP "\t.text"
77 #define DATA_SECTION_ASM_OP "\t.data"
78 #define BSS_SECTION_ASM_OP "\t.section\t.bss"
80 /* Output at beginning of assembler file. We override the definition
81 from <linux.h> so that we can get the proper .LEVEL directive. */
83 #define ASM_FILE_START(FILE) \
86 if (write_symbols != NO_DEBUG) \
88 output_file_directive (FILE, main_input_filename); \
89 fputs ("\t.version\t\"01.01\"\n", FILE); \
92 fputs("\t.LEVEL 2.0w\n", FILE); \
93 else if (TARGET_PA_20) \
94 fputs("\t.LEVEL 2.0\n", FILE); \
95 else if (TARGET_PA_11) \
96 fputs("\t.LEVEL 1.1\n", FILE); \
98 fputs("\t.LEVEL 1.0\n", FILE); \
100 fputs ("\t.IMPORT _mcount, CODE\n", FILE); \
104 /* Output a definition */
105 #define ASM_OUTPUT_DEF(FILE,LABEL1,LABEL2) \
108 fprintf ((FILE), "\t%s\t", SET_ASM_OP); \
109 assemble_name (FILE, LABEL1); \
110 fprintf (FILE, ","); \
111 assemble_name (FILE, LABEL2); \
112 fprintf (FILE, "\n"); \
116 /* Define these to generate the Linux/ELF/SysV style of internal
117 labels all the time - i.e. to be compatible with
118 ASM_GENERATE_INTERNAL_LABEL in <elfos.h>. Compare these with the
119 ones in pa.h and note the lack of dollar signs in these. FIXME:
120 shouldn't we fix pa.h to use ASM_GENERATE_INTERNAL_LABEL instead? */
122 #undef ASM_OUTPUT_ADDR_VEC_ELT
123 #define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE) \
124 if (TARGET_BIG_SWITCH) \
125 fprintf (FILE, "\tstw %%r1,-16(%%r30)\n\tldil LR'.L%d,%%r1\n\tbe RR'.L%d(%%sr4,%%r1)\n\tldw -16(%%r30),%%r1\n", VALUE, VALUE); \
127 fprintf (FILE, "\tb .L%d\n\tnop\n", VALUE)
129 #undef ASM_OUTPUT_ADDR_DIFF_ELT
130 #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL) \
131 if (TARGET_BIG_SWITCH) \
132 fprintf (FILE, "\tstw %%r1,-16(%%r30)\n\tldw T'.L%d(%%r19),%%r1\n\tbv %%r0(%%r1)\n\tldw -16(%%r30),%%r1\n", VALUE); \
134 fprintf (FILE, "\tb .L%d\n\tnop\n", VALUE)
136 /* This is how to output the definition of a user-level label named NAME,
137 such as the label on a static function or variable NAME. */
139 #undef ASM_OUTPUT_LABEL
140 #define ASM_OUTPUT_LABEL(FILE, NAME) \
143 assemble_name (FILE, NAME); \
144 fputs (":\n", FILE); \
148 /* NOTE: ASM_OUTPUT_INTERNAL_LABEL() is defined for us by elfos.h, and
149 does what we want (i.e. uses colons). It must be compatible with
150 ASM_GENERATE_INTERNAL_LABEL(), so do not define it here. */
152 #undef ASM_GLOBALIZE_LABEL
153 #define ASM_GLOBALIZE_LABEL(FILE, NAME) \
154 (fputs (".globl ", FILE), assemble_name (FILE, NAME), fputs ("\n", FILE))
156 /* FIXME: Hacked from the <elfos.h> one so that we avoid multiple
157 labels in a function declaration (since pa.c seems determined to do
160 #undef ASM_DECLARE_FUNCTION_NAME
161 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \
164 fprintf (FILE, "\t%s\t ", TYPE_ASM_OP); \
165 assemble_name (FILE, NAME); \
167 fprintf (FILE, TYPE_OPERAND_FMT, "function"); \
169 ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL)); \
173 /* Linux always uses gas. */