198 lines
7.3 KiB
C
198 lines
7.3 KiB
C
/* Definitions of target machine for GNU compiler. MIPS R4000 version with
|
|
GOFAST floating point library.
|
|
Copyright (C) 1994, 1995, 1996, 1997 Free Software Foundation, Inc.
|
|
|
|
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 2, 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. */
|
|
|
|
#define OBJECT_FORMAT_ELF
|
|
|
|
/* Default to -mips3. */
|
|
#define TARGET_DEFAULT MASK_FLOAT64|MASK_64BIT
|
|
#define MIPS_ISA_DEFAULT 3
|
|
|
|
/* Until we figure out what MIPS ELF targets normally use, just do
|
|
stabs in ELF. */
|
|
#ifndef PREFERRED_DEBUGGING_TYPE
|
|
#define PREFERRED_DEBUGGING_TYPE DBX_DEBUG
|
|
#endif
|
|
|
|
/* US Software GOFAST library support. */
|
|
#include "gofast.h"
|
|
#define INIT_SUBTARGET_OPTABS INIT_GOFAST_OPTABS
|
|
|
|
#include "mips/mips.h"
|
|
|
|
/* This must be done after mips.h, because mips.h defines
|
|
TARGET_ENDIAN_DEFAULT. */
|
|
#undef MULTILIB_DEFAULTS
|
|
#if TARGET_ENDIAN_DEFAULT == 0
|
|
#define MULTILIB_DEFAULTS { "EL", "mips3" }
|
|
#else
|
|
#define MULTILIB_DEFAULTS { "EB", "mips3" }
|
|
#endif
|
|
|
|
#undef CPP_PREDEFINES
|
|
#define CPP_PREDEFINES "-Dmips -DMIPSEB -DR4000 -D_mips -D_MIPSEB -D_R4000"
|
|
|
|
/* I would rather put this in CPP_PREDEFINES, but the gcc driver
|
|
doesn't handle -U options in CPP_PREDEFINES. */
|
|
#undef SUBTARGET_CPP_SPEC
|
|
#define SUBTARGET_CPP_SPEC "\
|
|
%{!mips1:%{!mips2:-U__mips -D__mips=3 -D__mips64}}"
|
|
|
|
/* Use memcpy, et. al., rather than bcopy. */
|
|
#define TARGET_MEM_FUNCTIONS
|
|
|
|
/* Biggest alignment supported by the object file format of this
|
|
machine. Use this macro to limit the alignment which can be
|
|
specified using the `__attribute__ ((aligned (N)))' construct. If
|
|
not defined, the default value is `BIGGEST_ALIGNMENT'. */
|
|
|
|
#define MAX_OFILE_ALIGNMENT (32768*8)
|
|
|
|
/* We need to use .esize and .etype instead of .size and .type to
|
|
avoid conflicting with ELF directives. */
|
|
#undef PUT_SDB_SIZE
|
|
#define PUT_SDB_SIZE(a) \
|
|
do { \
|
|
extern FILE *asm_out_text_file; \
|
|
fprintf (asm_out_text_file, "\t.esize\t%d;", (a)); \
|
|
} while (0)
|
|
|
|
#undef PUT_SDB_TYPE
|
|
#define PUT_SDB_TYPE(a) \
|
|
do { \
|
|
extern FILE *asm_out_text_file; \
|
|
fprintf (asm_out_text_file, "\t.etype\t0x%x;", (a)); \
|
|
} while (0)
|
|
|
|
/* A C statement to output something to the assembler file to switch to section
|
|
NAME for object DECL which is either a FUNCTION_DECL, a VAR_DECL or
|
|
NULL_TREE. Some target formats do not support arbitrary sections. Do not
|
|
define this macro in such cases. */
|
|
|
|
#define ASM_OUTPUT_SECTION_NAME(F, DECL, NAME, RELOC) \
|
|
do { \
|
|
extern FILE *asm_out_text_file; \
|
|
if ((DECL) && TREE_CODE (DECL) == FUNCTION_DECL) \
|
|
fprintf (asm_out_text_file, "\t.section %s,\"ax\",@progbits\n", (NAME)); \
|
|
else if ((DECL) && DECL_READONLY_SECTION (DECL, RELOC)) \
|
|
fprintf (F, "\t.section %s,\"a\",@progbits\n", (NAME)); \
|
|
else \
|
|
fprintf (F, "\t.section %s,\"aw\",@progbits\n", (NAME)); \
|
|
} while (0)
|
|
|
|
/* The following macro defines the format used to output the second
|
|
operand of the .type assembler directive. Different svr4 assemblers
|
|
expect various different forms for this operand. The one given here
|
|
is just a default. You may need to override it in your machine-
|
|
specific tm.h file (depending upon the particulars of your assembler). */
|
|
|
|
#define TYPE_OPERAND_FMT "@%s"
|
|
|
|
/* Define the strings used for the special svr4 .type and .size directives.
|
|
These strings generally do not vary from one system running svr4 to
|
|
another, but if a given system (e.g. m88k running svr) needs to use
|
|
different pseudo-op names for these, they may be overridden in the
|
|
file which includes this one. */
|
|
|
|
#undef TYPE_ASM_OP
|
|
#undef SIZE_ASM_OP
|
|
#define TYPE_ASM_OP ".type"
|
|
#define SIZE_ASM_OP ".size"
|
|
|
|
/* These macros generate the special .type and .size directives which
|
|
are used to set the corresponding fields of the linker symbol table
|
|
entries in an ELF object file under SVR4. These macros also output
|
|
the starting labels for the relevant functions/objects. */
|
|
|
|
/* Write the extra assembler code needed to declare an object properly. */
|
|
|
|
#undef ASM_DECLARE_OBJECT_NAME
|
|
#define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL) \
|
|
do { \
|
|
fprintf (FILE, "\t%s\t ", TYPE_ASM_OP); \
|
|
assemble_name (FILE, NAME); \
|
|
putc (',', FILE); \
|
|
fprintf (FILE, TYPE_OPERAND_FMT, "object"); \
|
|
putc ('\n', FILE); \
|
|
size_directive_output = 0; \
|
|
if (!flag_inhibit_size_directive && DECL_SIZE (DECL)) \
|
|
{ \
|
|
size_directive_output = 1; \
|
|
fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \
|
|
assemble_name (FILE, NAME); \
|
|
fprintf (FILE, ",%d\n", int_size_in_bytes (TREE_TYPE (DECL))); \
|
|
} \
|
|
mips_declare_object (FILE, NAME, "", ":\n", 0); \
|
|
} while (0)
|
|
|
|
/* Output the size directive for a decl in rest_of_decl_compilation
|
|
in the case where we did not do so before the initializer.
|
|
Once we find the error_mark_node, we know that the value of
|
|
size_directive_output was set
|
|
by ASM_DECLARE_OBJECT_NAME when it was run for the same decl. */
|
|
|
|
#undef ASM_FINISH_DECLARE_OBJECT
|
|
#define ASM_FINISH_DECLARE_OBJECT(FILE, DECL, TOP_LEVEL, AT_END) \
|
|
do { \
|
|
char *name = XSTR (XEXP (DECL_RTL (DECL), 0), 0); \
|
|
if (!flag_inhibit_size_directive && DECL_SIZE (DECL) \
|
|
&& ! AT_END && TOP_LEVEL \
|
|
&& DECL_INITIAL (DECL) == error_mark_node \
|
|
&& !size_directive_output) \
|
|
{ \
|
|
size_directive_output = 1; \
|
|
fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \
|
|
assemble_name (FILE, name); \
|
|
fprintf (FILE, ",%d\n", int_size_in_bytes (TREE_TYPE (DECL))); \
|
|
} \
|
|
} while (0)
|
|
|
|
#define ASM_OUTPUT_DEF(FILE,LABEL1,LABEL2) \
|
|
do { fputc ( '\t', FILE); \
|
|
assemble_name (FILE, LABEL1); \
|
|
fputs ( " = ", FILE); \
|
|
assemble_name (FILE, LABEL2); \
|
|
fputc ( '\n', FILE); \
|
|
} while (0)
|
|
|
|
/* Note about .weak vs. .weakext
|
|
The mips native assemblers support .weakext, but not .weak.
|
|
mips-elf gas supports .weak, but not .weakext.
|
|
mips-elf gas has been changed to support both .weak and .weakext,
|
|
but until that support is generally available, the 'if' below
|
|
should serve. */
|
|
|
|
#define ASM_WEAKEN_LABEL(FILE,NAME) ASM_OUTPUT_WEAK_ALIAS(FILE,NAME,0)
|
|
#define ASM_OUTPUT_WEAK_ALIAS(FILE,NAME,VALUE) \
|
|
do { \
|
|
if (TARGET_GAS) \
|
|
fputs ("\t.weak\t", FILE); \
|
|
else \
|
|
fputs ("\t.weakext\t", FILE); \
|
|
assemble_name (FILE, NAME); \
|
|
if (VALUE) \
|
|
{ \
|
|
fputc (' ', FILE); \
|
|
assemble_name (FILE, VALUE); \
|
|
} \
|
|
fputc ('\n', FILE); \
|
|
} while (0)
|
|
|