config.gcc: Set cpu_type to m68k for 68010, as well.
* config.gcc: Set cpu_type to m68k for 68010, as well. (m68010-*-netbsdelf*): New... (m68k*-*-netbsdelf*): ...targets. * config/m68k/netbsd-elf.h: New file. From-SVN: r49464
This commit is contained in:
parent
ffe80457ad
commit
2fd95d71b4
3 changed files with 540 additions and 1 deletions
|
@ -1,3 +1,10 @@
|
|||
2002-02-03 Jason Thorpe <thorpej@wasabisystems.com>
|
||||
|
||||
* config.gcc: Set cpu_type to m68k for 68010, as well.
|
||||
(m68010-*-netbsdelf*): New...
|
||||
(m68k*-*-netbsdelf*): ...targets.
|
||||
* config/m68k/netbsd-elf.h: New file.
|
||||
|
||||
2002-02-02 Kazu Hirata <kazu@hxi.com>
|
||||
|
||||
* config/h8300/h8300.c (hand_list): Move inside function_arg.
|
||||
|
|
|
@ -243,7 +243,7 @@ ia64-*-*)
|
|||
hppa*-*-* | parisc*-*-*)
|
||||
cpu_type=pa
|
||||
;;
|
||||
m680[02]0-*-*)
|
||||
m680[012]0-*-*)
|
||||
cpu_type=m68k
|
||||
extra_headers=math-68881.h
|
||||
;;
|
||||
|
@ -1932,6 +1932,18 @@ m68k-*-lynxos*)
|
|||
tmake_file=m68k/t-lynx
|
||||
float_format=m68k
|
||||
;;
|
||||
m68010-*-netbsdelf* | m68k*-*-netbsdelf*)
|
||||
tm_file="${tm_file} dbxelf.h elfos.h netbsd.h netbsd-elf.h m68k/netbsd-elf.h"
|
||||
case $machine in
|
||||
m68010*)
|
||||
target_cpu_default="0"
|
||||
;;
|
||||
*)
|
||||
target_cpu_default="MASK_68020|MASK_68881|MASK_BITFIELD"
|
||||
;;
|
||||
esac
|
||||
float_format=m68k
|
||||
;;
|
||||
m68k*-*-netbsd*)
|
||||
tm_file=m68k/netbsd.h
|
||||
tmake_file=t-netbsd
|
||||
|
|
520
gcc/config/m68k/netbsd-elf.h
Normal file
520
gcc/config/m68k/netbsd-elf.h
Normal file
|
@ -0,0 +1,520 @@
|
|||
/* Definitions of target machine for GNU compiler,
|
||||
for m68k (including m68010) NetBSD platforms using the
|
||||
ELF object format.
|
||||
Copyright (C) 2002 Free Software Foundation, Inc.
|
||||
Contributed by Wasabi Systems. Inc.
|
||||
|
||||
This file is derived from <m68k/m68kv4.h>, <m68k/m68kelf.h>,
|
||||
and <m68k/linux.h>.
|
||||
|
||||
This file is part of GNU CC.
|
||||
|
||||
GNU CC is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 1, or (at your option)
|
||||
any later version.
|
||||
|
||||
GNU CC is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with GNU CC; see the file COPYING. If not, write to
|
||||
the Free Software Foundation, 59 Temple Place - Suite 330,
|
||||
Boston, MA 02111-1307, USA. */
|
||||
|
||||
|
||||
/* Default target comes from config.gcc */
|
||||
#undef TARGET_DEFAULT
|
||||
#define TARGET_DEFAULT TARGET_CPU_DEFAULT
|
||||
|
||||
|
||||
/* Don't try using XFmode on the 68010. */
|
||||
#if TARGET_DEFAULT == 0
|
||||
#undef LONG_DOUBLE_TYPE_SIZE
|
||||
#define LONG_DOUBLE_TYPE_SIZE 64
|
||||
|
||||
/* Use software floating point emulator for REAL_ARITHMETIC and
|
||||
decimal <-> binary conversion. */
|
||||
#define REAL_ARITHMETIC
|
||||
#endif
|
||||
|
||||
#ifdef __mc68010__
|
||||
#define LIBGCC2_LONG_DOUBLE_TYPE_SIZE 64
|
||||
#endif
|
||||
|
||||
#define EXTRA_SPECS \
|
||||
{ "cpp_cpu_default_spec", CPP_CPU_DEFAULT_SPEC }, \
|
||||
{ "cpp_cpu_spec", CPP_CPU_SPEC }, \
|
||||
{ "cpp_fpu_spec", CPP_FPU_SPEC }, \
|
||||
{ "asm_default_spec", ASM_DEFAULT_SPEC },
|
||||
|
||||
|
||||
#define CPP_CPU_SPEC \
|
||||
"%{m68010:-D__mc68010__} \
|
||||
%{m68020:-D__mc68020__} \
|
||||
%{m68030:-D__mc68030__} \
|
||||
%{m68040:-D__mc68040__} \
|
||||
%(cpp_cpu_default_spec)"
|
||||
|
||||
|
||||
#undef TARGET_VERSION
|
||||
#if TARGET_DEFAULT & MASK_68020
|
||||
#define TARGET_VERSION fprintf (stderr, " (NetBSD/m68k ELF)");
|
||||
#define CPP_CPU_DEFAULT_SPEC "%{!m680*:-D__mc68020__}"
|
||||
#define ASM_DEFAULT_SPEC "%{!m680*:-m68020}"
|
||||
#else
|
||||
#define TARGET_VERSION fprintf (stderr, " (NetBSD/68010 ELF)");
|
||||
#define CPP_CPU_DEFAULT_SPEC "%{!m680*:-D__mc68010__}"
|
||||
#define ASM_DEFAULT_SPEC "%{!m680*:-m68010}"
|
||||
#endif
|
||||
|
||||
|
||||
#if TARGET_DEFAULT & MASK_68881
|
||||
#define CPP_FPU_SPEC "%{!msoft-float:-D__HAVE_68881__ -D__HAVE_FPU__}"
|
||||
#else
|
||||
#define CPP_FPU_SPEC "%{m68881:-D__HAVE_68881__ -D__HAVE_FPU__}"
|
||||
#endif
|
||||
|
||||
|
||||
/* Provide a CPP_SPEC appropriate for NetBSD m68k targets. Currently we
|
||||
deal with the GCC option '-posix', as well as an indication as to
|
||||
whether or not use of the FPU is allowed. */
|
||||
|
||||
#undef CPP_SPEC
|
||||
#define CPP_SPEC \
|
||||
"%{posix:-D_POSIX_SOURCE} %(cpp_cpu_spec) %(cpp_fpu_spec)"
|
||||
|
||||
|
||||
/* Provide an ASM_SPEC appropriate for NetBSD m68k ELF targets. We pass
|
||||
on some CPU options, as well as PIC code generation options. */
|
||||
|
||||
#undef ASM_SPEC
|
||||
#define ASM_SPEC \
|
||||
" %| %(asm_default_spec) \
|
||||
%{m68010} %{m68020} %{m68030} %{m68040} %{m68060} \
|
||||
%{fpic:-k} %{fPIC:-k -K}"
|
||||
|
||||
|
||||
/* Provide a set of CPP pre-definitions and pre-assertions appropriate
|
||||
for NetBSD m68k ELF targets (using the SVR4 ABI). */
|
||||
|
||||
#undef CPP_PREDEFINES
|
||||
#define CPP_PREDEFINES \
|
||||
"-D__NetBSD__ -D__ELF__ -D__m68k__ -D__SVR4_ABI__ -D__motorola__ \
|
||||
-Asystem=unix -Asystem=NetBSD -Acpu=m68k -Amachine=m68k"
|
||||
|
||||
|
||||
/* Provide a LINK_SPEC appropriate for a NetBSD/m68k ELF target.
|
||||
This is a copy of LINK_SPEC from <netbsd-elf.h> tweaked for
|
||||
the m68k target. */
|
||||
|
||||
#undef LINK_SPEC
|
||||
#define LINK_SPEC \
|
||||
"%{assert*} %{R*} \
|
||||
%{shared:-shared} \
|
||||
%{!shared: \
|
||||
-dc -dp \
|
||||
%{!nostdlib: \
|
||||
%{!r*: \
|
||||
%{!e*:-e _start}}} \
|
||||
%{!static: \
|
||||
%{rdynamic:-export-dynamic} \
|
||||
%{!dynamic-linker:-dynamic-linker /usr/libexec/ld.elf_so}} \
|
||||
%{static:-static}}"
|
||||
|
||||
|
||||
/* Output assembler code to FILE to increment profiler label # LABELNO
|
||||
for profiling a function only. */
|
||||
|
||||
#undef FUNCTION_PROFILER
|
||||
#define FUNCTION_PROFILER(FILE, LABELNO) \
|
||||
do \
|
||||
{ \
|
||||
asm_fprintf (FILE, "\tlea (%LLP%d,%Rpc),%Ra1\n", (LABELNO)); \
|
||||
if (flag_pic) \
|
||||
fprintf (FILE, "\tbsr.l __mcount@PLTPC\n"); \
|
||||
else \
|
||||
fprintf (FILE, "\tjbsr __mcount\n"); \
|
||||
} \
|
||||
while (0)
|
||||
|
||||
|
||||
/* Make gcc agree with <machine/ansi.h> */
|
||||
|
||||
#undef SIZE_TYPE
|
||||
#define SIZE_TYPE "unsigned int"
|
||||
|
||||
#undef PTRDIFF_TYPE
|
||||
#define PTRDIFF_TYPE "int"
|
||||
|
||||
#undef WCHAR_TYPE
|
||||
#define WCHAR_TYPE "int"
|
||||
|
||||
#undef WCHAR_UNSIGNED
|
||||
#define WCHAR_UNSIGNED 0
|
||||
|
||||
#undef WCHAR_TYPE_SIZE
|
||||
#define WCHAR_TYPE_SIZE 32
|
||||
|
||||
|
||||
/* XXX
|
||||
Here is a bunch of stuff lifted from m68kelf.h. We don't use that
|
||||
file directly, because it has a lot of baggage we don't want. */
|
||||
|
||||
#define MOTOROLA /* Use Motorola syntax */
|
||||
#define USE_GAS /* But GAS wants jbsr instead of jsr */
|
||||
|
||||
|
||||
/* The prefix for register names. Note that REGISTER_NAMES
|
||||
is supposed to include this prefix. Also note that this is NOT an
|
||||
fprintf format string, it is a literal string. */
|
||||
|
||||
#undef REGISTER_PREFIX
|
||||
#define REGISTER_PREFIX "%"
|
||||
|
||||
|
||||
/* The prefix for local (compiler generated) lables.
|
||||
These labels will not appear in the symbol table. */
|
||||
|
||||
#undef LOCAL_LABEL_PREFIX
|
||||
#define LOCAL_LABEL_PREFIX "."
|
||||
|
||||
|
||||
/* The prefix to add to user-visible assembler symbols. */
|
||||
|
||||
#undef USER_LABEL_PREFIX
|
||||
#define USER_LABEL_PREFIX ""
|
||||
|
||||
|
||||
/* The prefix for immediate operands. */
|
||||
|
||||
#undef IMMEDIATE_PREFIX
|
||||
#define IMMEDIATE_PREFIX "#"
|
||||
|
||||
|
||||
#undef ASM_COMMENT_START
|
||||
#define ASM_COMMENT_START "|"
|
||||
|
||||
|
||||
/* How to refer to registers in assembler output.
|
||||
This sequence is indexed by compiler's hard-register-number.
|
||||
Motorola format uses different register names than defined in m68k.h.
|
||||
We also take this chance to convert 'a6' to 'fp' */
|
||||
|
||||
#undef REGISTER_NAMES
|
||||
|
||||
#ifndef SUPPORT_SUN_FPA
|
||||
|
||||
#define REGISTER_NAMES \
|
||||
{"%d0", "%d1", "%d2", "%d3", "%d4", "%d5", "%d6", "%d7", \
|
||||
"%a0", "%a1", "%a2", "%a3", "%a4", "%a5", "%fp", "%sp", \
|
||||
"%fp0", "%fp1", "%fp2", "%fp3", "%fp4", "%fp5", "%fp6", "%fp7" }
|
||||
|
||||
#else /* SUPPORT_SUN_FPA */
|
||||
|
||||
#define REGISTER_NAMES \
|
||||
{"%d0", "%d1", "%d2", "%d3", "%d4", "%d5", "%d6", "%d7", \
|
||||
"%a0", "%a1", "%a2", "%a3", "%a4", "%a5", "%fp", "%sp", \
|
||||
"%fp0", "%fp1", "%fp2", "%fp3", "%fp4", "%fp5", "%fp6", "%fp7", \
|
||||
"%fpa0", "%fpa1", "%fpa2", "%fpa3", "%fpa4", "%fpa5", "%fpa6","%fpa7", \
|
||||
"%fpa8", "%fpa9", "%fpa10","%fpa11","%fpa12","%fpa13","%fpa14","%fpa15", \
|
||||
"%fpa16","%fpa17","%fpa18","%fpa19","%fpa20","%fpa21","%fpa22","%fpa23", \
|
||||
"%fpa24","%fpa25","%fpa26","%fpa27","%fpa28","%fpa29","%fpa30","%fpa31" }
|
||||
|
||||
#endif /* ! SUPPORT_SUN_FPA */
|
||||
|
||||
|
||||
/* Currently, JUMP_TABLES_IN_TEXT_SECTION must be defined in order to
|
||||
keep switch tables in the text section. */
|
||||
|
||||
#undef JUMP_TABLES_IN_TEXT_SECTION
|
||||
#define JUMP_TABLES_IN_TEXT_SECTION 1
|
||||
|
||||
|
||||
/* Use the default action for outputting the case label. */
|
||||
#undef ASM_OUTPUT_CASE_LABEL
|
||||
#define ASM_RETURN_CASE_JUMP \
|
||||
do \
|
||||
{ \
|
||||
if (TARGET_5200) \
|
||||
return "ext%.l %0\n\tjmp %%pc@(2,%0:l)"; \
|
||||
else \
|
||||
return "jmp %%pc@(2,%0:w)"; \
|
||||
} \
|
||||
while (0)
|
||||
|
||||
|
||||
/* This is how to output an assembler line that says to advance the
|
||||
location counter to a multiple of 2**LOG bytes. */
|
||||
|
||||
#undef ASM_OUTPUT_ALIGN
|
||||
#define ASM_OUTPUT_ALIGN(FILE,LOG) \
|
||||
do \
|
||||
{ \
|
||||
if ((LOG) > 0) \
|
||||
fprintf ((FILE), "%s%u\n", ALIGN_ASM_OP, 1 << (LOG)); \
|
||||
} \
|
||||
while (0)
|
||||
|
||||
|
||||
/* If defined, a C expression whose value is a string containing the
|
||||
assembler operation to identify the following data as uninitialized global
|
||||
data. */
|
||||
|
||||
#define BSS_SECTION_ASM_OP ".section\t.bss"
|
||||
|
||||
|
||||
/* Like `ASM_OUTPUT_BSS' except takes the required alignment as a
|
||||
separate, explicit argument. If you define this macro, it is used
|
||||
in place of `ASM_OUTPUT_BSS', and gives you more flexibility in
|
||||
handling the required alignment of the variable. The alignment is
|
||||
specified as the number of bits.
|
||||
|
||||
Try to use function `asm_output_aligned_bss' defined in file
|
||||
`varasm.c' when defining this macro. */
|
||||
|
||||
#undef ASM_OUTPUT_ALIGNED_BSS
|
||||
#define ASM_OUTPUT_ALIGNED_BSS(FILE, DECL, NAME, SIZE, ALIGN) \
|
||||
asm_output_aligned_bss (FILE, DECL, NAME, SIZE, ALIGN)
|
||||
|
||||
|
||||
#undef ASM_OUTPUT_COMMON
|
||||
#define ASM_OUTPUT_COMMON(FILE, NAME, SIZE, ROUNDED) \
|
||||
( fputs (".comm ", (FILE)), \
|
||||
assemble_name ((FILE), (NAME)), \
|
||||
fprintf ((FILE), ",%u\n", (SIZE)))
|
||||
|
||||
#undef ASM_OUTPUT_LOCAL
|
||||
#define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED) \
|
||||
( fputs (".lcomm ", (FILE)), \
|
||||
assemble_name ((FILE), (NAME)), \
|
||||
fprintf ((FILE), ",%u\n", (SIZE)))
|
||||
|
||||
|
||||
/* Turn off function cse if we are doing PIC. We always want function
|
||||
call to be done as `bsr foo@PLTPC', so it will force the assembler
|
||||
to create the PLT entry for `foo'. Doing function cse will cause
|
||||
the address of `foo' to be loaded into a register, which is exactly
|
||||
what we want to avoid when we are doing PIC on svr4 m68k. */
|
||||
|
||||
#undef SUBTARGET_OVERRIDE_OPTIONS
|
||||
#define SUBTARGET_OVERRIDE_OPTIONS \
|
||||
if (flag_pic) flag_no_function_cse = 1;
|
||||
|
||||
|
||||
/* XXX
|
||||
This is the end of the chunk lifted from m68kelf.h */
|
||||
|
||||
|
||||
/* XXX
|
||||
The following chunk is more or less lifted from m68kv4.h.
|
||||
We'd like to just #include that file, but it has not yet
|
||||
been converted to the new include style.
|
||||
|
||||
Should there be a m68kv4-abi.h ?? */
|
||||
|
||||
|
||||
/* Register in which address to store a structure value is passed to a
|
||||
function. The default in m68k.h is a1. For m68k/SVR4 it is a0. */
|
||||
|
||||
#undef STRUCT_VALUE_REGNUM
|
||||
#define STRUCT_VALUE_REGNUM 8
|
||||
|
||||
|
||||
/* Register in which static-chain is passed to a function. The
|
||||
default isn m68k.h is a0, but that is already the struct value
|
||||
regnum. Make it a1 instead. */
|
||||
|
||||
#undef STATIC_CHAIN_REGNUM
|
||||
#define STATIC_CHAIN_REGNUM 9
|
||||
|
||||
|
||||
/* Now to renumber registers for dbx and gdb.
|
||||
We use the Sun-3 convention, which is:
|
||||
floating point registers have numbers 18 to 25, not
|
||||
16 to 23 as they do in the compiler. */
|
||||
|
||||
#undef DBX_REGISTER_NUMBER
|
||||
#define DBX_REGISTER_NUMBER(REGNO) ((REGNO) < 16 ? (REGNO) : (REGNO) + 2)
|
||||
|
||||
|
||||
/* 1 if N is a possible register number for a function value. For
|
||||
m68k/SVR4 allow d0, a0, or fp0 as return registers, for integral,
|
||||
pointer, or floating types, respectively. Reject fp0 if not using
|
||||
a 68881 coprocessor. */
|
||||
|
||||
#undef FUNCTION_VALUE_REGNO_P
|
||||
#define FUNCTION_VALUE_REGNO_P(N) \
|
||||
((N) == 0 || (N) == 8 || (TARGET_68881 && (N) == 16))
|
||||
|
||||
|
||||
/* Define this to be true when FUNCTION_VALUE_REGNO_P is true for
|
||||
more than one register. */
|
||||
|
||||
#undef NEEDS_UNTYPED_CALL
|
||||
#define NEEDS_UNTYPED_CALL 1
|
||||
|
||||
|
||||
/* Define how to generate (in the callee) the output value of a
|
||||
function and how to find (in the caller) the value returned by a
|
||||
function. VALTYPE is the data type of the value (as a tree). If
|
||||
the precise function being called is known, FUNC is its
|
||||
FUNCTION_DECL; otherwise, FUNC is 0. For m68k/SVR4 generate the
|
||||
result in d0, a0, or fp0 as appropriate. */
|
||||
|
||||
#undef FUNCTION_VALUE
|
||||
#define FUNCTION_VALUE(VALTYPE, FUNC) \
|
||||
(TREE_CODE (VALTYPE) == REAL_TYPE && TARGET_68881 \
|
||||
? gen_rtx_REG (TYPE_MODE (VALTYPE), 16) \
|
||||
: (POINTER_TYPE_P (VALTYPE) \
|
||||
? gen_rtx_REG (TYPE_MODE (VALTYPE), 8) \
|
||||
: gen_rtx_REG (TYPE_MODE (VALTYPE), 0)))
|
||||
|
||||
|
||||
/* For compatibility with the large body of existing code which does
|
||||
not always properly declare external functions returning pointer
|
||||
types, the m68k/SVR4 convention is to copy the value returned for
|
||||
pointer functions from a0 to d0 in the function epilogue, so that
|
||||
callers that have neglected to properly declare the callee can
|
||||
still find the correct return value. */
|
||||
|
||||
extern int current_function_returns_pointer;
|
||||
#define FUNCTION_EXTRA_EPILOGUE(FILE, SIZE) \
|
||||
do \
|
||||
{ \
|
||||
if (current_function_returns_pointer \
|
||||
&& ! find_equiv_reg (0, get_last_insn (), 0, 0, 0, 8, Pmode)) \
|
||||
asm_fprintf (FILE, "\tmove.l %Ra0,%Rd0\n"); \
|
||||
} \
|
||||
while (0)
|
||||
|
||||
|
||||
/* Define how to find the value returned by a library function
|
||||
assuming the value has mode MODE.
|
||||
For m68k/SVR4 look for integer values in d0, pointer values in d0
|
||||
(returned in both d0 and a0), and floating values in fp0. */
|
||||
|
||||
#undef LIBCALL_VALUE
|
||||
#define LIBCALL_VALUE(MODE) \
|
||||
((((MODE) == SFmode || (MODE) == DFmode || (MODE) == XFmode) \
|
||||
&& TARGET_68881) \
|
||||
? gen_rtx_REG (MODE, 16) \
|
||||
: gen_rtx_REG (MODE, 0))
|
||||
|
||||
|
||||
/* Boundary (in *bits*) on which stack pointer should be aligned.
|
||||
The m68k/SVR4 convention is to keep the stack pointer longword aligned. */
|
||||
|
||||
#undef STACK_BOUNDARY
|
||||
#define STACK_BOUNDARY 32
|
||||
|
||||
|
||||
/* Alignment of field after `int : 0' in a structure.
|
||||
For m68k/SVR4, this is the next longword boundary. */
|
||||
|
||||
#undef EMPTY_FIELD_BOUNDARY
|
||||
#define EMPTY_FIELD_BOUNDARY 32
|
||||
|
||||
|
||||
/* No data type wants to be aligned rounder than this.
|
||||
For m68k/SVR4, some types (doubles for example) are aligned on 8 byte
|
||||
boundaries */
|
||||
|
||||
#undef BIGGEST_ALIGNMENT
|
||||
#define BIGGEST_ALIGNMENT 64
|
||||
|
||||
|
||||
/* In m68k svr4, a symbol_ref rtx can be a valid PIC operand if it is
|
||||
an operand of a function call. */
|
||||
|
||||
#undef LEGITIMATE_PIC_OPERAND_P
|
||||
#define LEGITIMATE_PIC_OPERAND_P(X) \
|
||||
((! symbolic_operand (X, VOIDmode) \
|
||||
&& ! (GET_CODE (X) == CONST_DOUBLE && mem_for_const_double (X) \
|
||||
&& GET_CODE (mem_for_const_double (X)) == MEM \
|
||||
&& symbolic_operand (XEXP (mem_for_const_double (X), 0), \
|
||||
VOIDmode))) \
|
||||
|| (GET_CODE (X) == SYMBOL_REF && SYMBOL_REF_FLAG (X)) \
|
||||
|| PCREL_GENERAL_OPERAND_OK)
|
||||
|
||||
|
||||
/* For m68k SVR4, structures are returned using the reentrant
|
||||
technique. */
|
||||
|
||||
#undef PCC_STATIC_STRUCT_RETURN
|
||||
|
||||
|
||||
/* The svr4 ABI for the m68k says that records and unions are returned
|
||||
in memory. */
|
||||
|
||||
#undef DEFAULT_PCC_STRUCT_RETURN
|
||||
#define DEFAULT_PCC_STRUCT_RETURN 1
|
||||
|
||||
|
||||
/* Output code to add DELTA to the first argument, and then jump to FUNCTION.
|
||||
Used for C++ multiple inheritance. */
|
||||
|
||||
#define ASM_OUTPUT_MI_THUNK(FILE, THUNK_FNDECL, DELTA, FUNCTION) \
|
||||
do \
|
||||
{ \
|
||||
if (DELTA > 0 && DELTA <= 8) \
|
||||
asm_fprintf (FILE, "\taddq.l %I%d,4(%Rsp)\n", DELTA); \
|
||||
else if (DELTA < 0 && DELTA >= -8) \
|
||||
asm_fprintf (FILE, "\tsubq.l %I%d,4(%Rsp)\n", -DELTA); \
|
||||
else \
|
||||
asm_fprintf (FILE, "\tadd.l %I%d,4(%Rsp)\n", DELTA); \
|
||||
\
|
||||
if (flag_pic) \
|
||||
{ \
|
||||
fprintf (FILE, "\tbra.l "); \
|
||||
assemble_name (FILE, XSTR (XEXP (DECL_RTL (FUNCTION), 0), 0)); \
|
||||
fprintf (FILE, "@PLTPC\n"); \
|
||||
} \
|
||||
else \
|
||||
{ \
|
||||
fprintf (FILE, "\tjmp "); \
|
||||
assemble_name (FILE, XSTR (XEXP (DECL_RTL (FUNCTION), 0), 0)); \
|
||||
fprintf (FILE, "\n"); \
|
||||
} \
|
||||
} \
|
||||
while (0)
|
||||
|
||||
|
||||
/* Output assembler code for a block containing the constant parts
|
||||
of a trampoline, leaving space for the variable parts. */
|
||||
|
||||
/* On m68k svr4, the trampoline is different from the generic version
|
||||
in that we use a1 as the static call chain. */
|
||||
|
||||
#undef TRAMPOLINE_TEMPLATE
|
||||
#define TRAMPOLINE_TEMPLATE(FILE) \
|
||||
{ \
|
||||
assemble_aligned_integer (2, GEN_INT (0x227a)); \
|
||||
assemble_aligned_integer (2, GEN_INT (8)); \
|
||||
assemble_aligned_integer (2, GEN_INT (0x2f3a)); \
|
||||
assemble_aligned_integer (2, GEN_INT (8)); \
|
||||
assemble_aligned_integer (2, GEN_INT (0x4e75)); \
|
||||
assemble_aligned_integer (4, const0_rtx); \
|
||||
assemble_aligned_integer (4, const0_rtx); \
|
||||
}
|
||||
|
||||
/* Redefine since we are using a different trampoline */
|
||||
#undef TRAMPOLINE_SIZE
|
||||
#define TRAMPOLINE_SIZE 18
|
||||
|
||||
/* Emit RTL insns to initialize the variable parts of a trampoline.
|
||||
FNADDR is an RTX for the address of the function's pure code.
|
||||
CXT is an RTX for the static chain value for the function. */
|
||||
|
||||
#undef INITIALIZE_TRAMPOLINE
|
||||
#define INITIALIZE_TRAMPOLINE(TRAMP, FNADDR, CXT) \
|
||||
{ \
|
||||
emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 10)), CXT); \
|
||||
emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 14)), FNADDR); \
|
||||
}
|
||||
|
||||
|
||||
/* XXX
|
||||
This is the end of the chunk lifted from m68kv4.h */
|
Loading…
Add table
Reference in a new issue