| /* Definitions of target machine for GNU compiler, for ARM with a.out |
| Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc. |
| Contributed by Richard Earnshaw (rearnsha@armltd.co.uk). |
| |
| 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. */ |
| |
| #ifndef ARM_OS_NAME |
| #define ARM_OS_NAME "(generic)" |
| #endif |
| |
| /* The text to go at the start of the assembler file */ |
| #define ASM_FILE_START(STREAM) \ |
| { \ |
| fprintf (STREAM,"%srfp\t.req\t%sr9\n", REGISTER_PREFIX, REGISTER_PREFIX); \ |
| fprintf (STREAM,"%ssl\t.req\t%sr10\n", REGISTER_PREFIX, REGISTER_PREFIX); \ |
| fprintf (STREAM,"%sfp\t.req\t%sr11\n", REGISTER_PREFIX, REGISTER_PREFIX); \ |
| fprintf (STREAM,"%sip\t.req\t%sr12\n", REGISTER_PREFIX, REGISTER_PREFIX); \ |
| fprintf (STREAM,"%ssp\t.req\t%sr13\n", REGISTER_PREFIX, REGISTER_PREFIX); \ |
| fprintf (STREAM,"%slr\t.req\t%sr14\n", REGISTER_PREFIX, REGISTER_PREFIX); \ |
| fprintf (STREAM,"%spc\t.req\t%sr15\n", REGISTER_PREFIX, REGISTER_PREFIX); \ |
| } |
| |
| #define ASM_APP_ON "" |
| #define ASM_APP_OFF "" |
| |
| /* Switch to the text or data segment. */ |
| #define TEXT_SECTION_ASM_OP ".text" |
| #define DATA_SECTION_ASM_OP ".data" |
| #define BSS_SECTION_ASM_OP ".bss" |
| |
| #define REGISTER_PREFIX "" |
| #define USER_LABEL_PREFIX "_" |
| #define LOCAL_LABEL_PREFIX "" |
| |
| /* The assembler's names for the registers. */ |
| #ifndef REGISTER_NAMES |
| #define REGISTER_NAMES \ |
| { \ |
| "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", \ |
| "r8", "r9", "sl", "fp", "ip", "sp", "lr", "pc", \ |
| "f0", "f1", "f2", "f3", "f4", "f5", "f6", "f7", \ |
| "cc", "sfp", "afp" \ |
| } |
| #endif |
| |
| #ifndef ADDITIONAL_REGISTER_NAMES |
| #define ADDITIONAL_REGISTER_NAMES \ |
| { \ |
| {"a1", 0}, \ |
| {"a2", 1}, \ |
| {"a3", 2}, \ |
| {"a4", 3}, \ |
| {"v1", 4}, \ |
| {"v2", 5}, \ |
| {"v3", 6}, \ |
| {"v4", 7}, \ |
| {"v5", 8}, \ |
| {"v6", 9}, \ |
| {"rfp", 9}, /* Gcc used to call it this */ \ |
| {"sb", 9}, \ |
| {"v7", 10}, \ |
| {"r10", 10}, /* sl */ \ |
| {"r11", 11}, /* fp */ \ |
| {"r12", 12}, /* ip */ \ |
| {"r13", 13}, /* sp */ \ |
| {"r14", 14}, /* lr */ \ |
| {"r15", 15} /* pc */ \ |
| } |
| #endif |
| |
| /* Arm Assembler barfs on dollars */ |
| #define DOLLARS_IN_IDENTIFIERS 0 |
| |
| #define NO_DOLLAR_IN_LABEL |
| |
| /* DBX register number for a given compiler register number */ |
| #define DBX_REGISTER_NUMBER(REGNO) (REGNO) |
| |
| /* Generate DBX debugging information. riscix.h will undefine this because |
| the native assembler does not support stabs. */ |
| #define DBX_DEBUGGING_INFO 1 |
| |
| /* Acorn dbx moans about continuation chars, so don't use any. */ |
| #ifndef DBX_CONTIN_LENGTH |
| #define DBX_CONTIN_LENGTH 0 |
| #endif |
| |
| /* Output a source filename for the debugger. RISCiX dbx insists that the |
| ``desc'' field is set to compiler version number >= 315 (sic). */ |
| #define DBX_OUTPUT_MAIN_SOURCE_FILENAME(STREAM,NAME) \ |
| do { \ |
| fprintf (STREAM, ".stabs \"%s\",%d,0,315,%s\n", (NAME), N_SO, \ |
| <ext_label_name[1]); \ |
| text_section (); \ |
| ASM_OUTPUT_INTERNAL_LABEL (STREAM, "Ltext", 0); \ |
| } while (0) |
| |
| /* Output a function label definition. */ |
| #define ASM_DECLARE_FUNCTION_NAME(STREAM,NAME,DECL) \ |
| ASM_OUTPUT_LABEL(STREAM, NAME) |
| |
| #define ARM_OUTPUT_LABEL(STREAM,NAME) \ |
| do { \ |
| assemble_name (STREAM,NAME); \ |
| fputs (":\n", STREAM); \ |
| } while (0) |
| |
| /* Output a globalising directive for a label. */ |
| #define ASM_GLOBALIZE_LABEL(STREAM,NAME) \ |
| (fprintf (STREAM, "\t.global\t"), \ |
| assemble_name (STREAM, NAME), \ |
| fputc ('\n',STREAM)) \ |
| |
| /* Make an internal label into a string. */ |
| #define ASM_GENERATE_INTERNAL_LABEL(STRING, PREFIX, NUM) \ |
| sprintf (STRING, "*%s%s%d", LOCAL_LABEL_PREFIX, PREFIX, NUM) |
| |
| /* Nothing special is done about jump tables */ |
| /* #define ASM_OUTPUT_CASE_LABEL(STREAM,PREFIX,NUM,TABLE) */ |
| /* #define ASM_OUTPUT_CASE_END(STREAM,NUM,TABLE) */ |
| |
| /* Construct a private name. */ |
| #define ASM_FORMAT_PRIVATE_NAME(OUTVAR,NAME,NUMBER) \ |
| ((OUTVAR) = (char *) alloca (strlen (NAME) + 10), \ |
| sprintf ((OUTVAR), "%s.%d", (NAME), (NUMBER))) |
| |
| /* Output an element of a dispatch table. */ |
| #define ASM_OUTPUT_ADDR_VEC_ELT(STREAM,VALUE) \ |
| fprintf (STREAM, "\t.word\t%sL%d\n", LOCAL_LABEL_PREFIX, VALUE) |
| |
| #define ASM_OUTPUT_ADDR_DIFF_ELT(STREAM,VALUE,REL) \ |
| fprintf (STREAM, "\tb\t%sL%d\n", LOCAL_LABEL_PREFIX, (VALUE)) |
| |
| /* Output various types of constants. For real numbers we output hex, with |
| a comment containing the "human" value, this allows us to pass NaN's which |
| the riscix assembler doesn't understand (it also makes cross-assembling |
| less likely to fail). */ |
| |
| #define ASM_OUTPUT_LONG_DOUBLE(STREAM,VALUE) \ |
| do { char dstr[30]; \ |
| long l[3]; \ |
| REAL_VALUE_TO_TARGET_LONG_DOUBLE (VALUE, l); \ |
| REAL_VALUE_TO_DECIMAL (VALUE, "%.20g", dstr); \ |
| fprintf (STREAM, "\t.long 0x%lx,0x%lx,0x%lx\t%s long double %s\n", \ |
| l[0], l[1], l[2], ASM_COMMENT_START, dstr); \ |
| } while (0) |
| |
| |
| #define ASM_OUTPUT_DOUBLE(STREAM, VALUE) \ |
| do { char dstr[30]; \ |
| long l[2]; \ |
| REAL_VALUE_TO_TARGET_DOUBLE (VALUE, l); \ |
| REAL_VALUE_TO_DECIMAL (VALUE, "%.14g", dstr); \ |
| fprintf (STREAM, "\t.long 0x%lx, 0x%lx\t%s double %s\n", l[0], \ |
| l[1], ASM_COMMENT_START, dstr); \ |
| } while (0) |
| |
| #define ASM_OUTPUT_FLOAT(STREAM, VALUE) \ |
| do { char dstr[30]; \ |
| long l; \ |
| REAL_VALUE_TO_TARGET_SINGLE (VALUE, l); \ |
| REAL_VALUE_TO_DECIMAL (VALUE, "%.7g", dstr); \ |
| fprintf (STREAM, "\t.word 0x%lx\t%s float %s\n", l, \ |
| ASM_COMMENT_START, dstr); \ |
| } while (0); |
| |
| #define ASM_OUTPUT_INT(STREAM, EXP) \ |
| { \ |
| fprintf (STREAM, "\t.word\t"); \ |
| OUTPUT_INT_ADDR_CONST (STREAM, (EXP)); \ |
| fputc ('\n', STREAM); \ |
| } |
| |
| #define ASM_OUTPUT_SHORT(STREAM, EXP) \ |
| (fprintf (STREAM, "\t.short\t"), \ |
| output_addr_const (STREAM, (EXP)), \ |
| fputc ('\n', STREAM)) |
| |
| #define ASM_OUTPUT_CHAR(STREAM, EXP) \ |
| (fprintf (STREAM, "\t.byte\t"), \ |
| output_addr_const (STREAM, (EXP)), \ |
| fputc ('\n', STREAM)) |
| |
| #define ASM_OUTPUT_BYTE(STREAM, VALUE) \ |
| fprintf (STREAM, "\t.byte\t%d\n", VALUE) |
| |
| #define ASM_OUTPUT_ASCII(STREAM, PTR, LEN) \ |
| output_ascii_pseudo_op ((STREAM), (unsigned char *)(PTR), (LEN)) |
| |
| /* Output a gap. In fact we fill it with nulls. */ |
| #define ASM_OUTPUT_SKIP(STREAM, NBYTES) \ |
| fprintf (STREAM, "\t.space\t%d\n", NBYTES) |
| |
| /* Align output to a power of two. Horrible /bin/as. */ |
| #define ASM_OUTPUT_ALIGN(STREAM, POWER) \ |
| do \ |
| { \ |
| register int amount = 1 << (POWER); \ |
| \ |
| if (amount == 2) \ |
| fprintf (STREAM, "\t.even\n"); \ |
| else if (amount != 1) \ |
| fprintf (STREAM, "\t.align\t%d\n", amount - 4); \ |
| } while (0) |
| |
| /* Output a common block */ |
| #define ASM_OUTPUT_COMMON(STREAM, NAME, SIZE, ROUNDED) \ |
| (fprintf (STREAM, "\t.comm\t"), \ |
| assemble_name ((STREAM), (NAME)), \ |
| fprintf(STREAM, ", %d\t%s %d\n", ROUNDED, ASM_COMMENT_START, SIZE)) |
| |
| /* Output a local common block. /bin/as can't do this, so hack a `.space' into |
| the bss segment. Note that this is *bad* practice. */ |
| #define ASM_OUTPUT_ALIGNED_LOCAL(STREAM,NAME,SIZE,ALIGN) \ |
| output_lcomm_directive (STREAM, NAME, SIZE, ALIGN) |
| |
| /* Output a zero-initialized block. */ |
| #define ASM_OUTPUT_ALIGNED_BSS(STREAM,DECL,NAME,SIZE,ALIGN) \ |
| asm_output_aligned_bss(STREAM, DECL, NAME, SIZE, ALIGN) |
| |
| /* Output a source line for the debugger. */ |
| /* #define ASM_OUTPUT_SOURCE_LINE(STREAM,LINE) */ |
| |
| /* Output a #ident directive. */ |
| #define ASM_OUTPUT_IDENT(STREAM,STRING) \ |
| fprintf (STREAM,"- - - ident %s\n",STRING) |
| |
| /* The assembler's parentheses characters. */ |
| #define ASM_OPEN_PAREN "(" |
| #define ASM_CLOSE_PAREN ")" |
| |
| #ifndef ASM_COMMENT_START |
| #define ASM_COMMENT_START "@" |
| #endif |
| |
| /* This works for GAS and some other assemblers. */ |
| #define SET_ASM_OP ".set" |
| |
| #include "arm/arm.h" |