1 /* Target definitions for GNU compiler for VAX using ELF 2 Copyright (C) 2002-2018 Free Software Foundation, Inc. 3 Contributed by Matt Thomas <matt@3am-software.com> 4 5 This file is part of GCC. 6 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 3, or (at your option) 10 any later version. 11 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. 16 17 You should have received a copy of the GNU General Public License 18 along with GCC; see the file COPYING3. If not see 19 <http://www.gnu.org/licenses/>. */ 20 21 #undef TARGET_ELF 22 #define TARGET_ELF 1 23 24 #undef REGISTER_PREFIX 25 #undef REGISTER_NAMES 26 #define REGISTER_PREFIX "%" 27 #define REGISTER_NAMES \ 28 { "%r0", "%r1", "%r2", "%r3", "%r4", "%r5", "%r6", "%r7", \ 29 "%r8", "%r9", "%r10", "%r11", "%ap", "%fp", "%sp", "%pc", } 30 31 #undef SIZE_TYPE 32 #define SIZE_TYPE "long unsigned int" 33 34 #undef PTRDIFF_TYPE 35 #define PTRDIFF_TYPE "long int" 36 37 /* Profiling routine. */ 38 #undef VAX_FUNCTION_PROFILER_NAME 39 #define VAX_FUNCTION_PROFILER_NAME "__mcount" 40 41 /* Let's be re-entrant. */ 42 #undef PCC_STATIC_STRUCT_RETURN 43 44 /* Before the prologue, the top of the frame is below the argument 45 count pushed by the CALLS and before the start of the saved registers. */ 46 #define INCOMING_FRAME_SP_OFFSET 0 47 48 /* Offset from the frame pointer register value to the top of the stack. */ 49 #define FRAME_POINTER_CFA_OFFSET(FNDECL) 0 50 51 /* We use R2-R5 (call-clobbered) registers for exceptions. */ 52 #define EH_RETURN_DATA_REGNO(N) ((N) < 4 ? (N) + 2 : INVALID_REGNUM) 53 54 /* Place the top of the stack for the DWARF2 EH stackadj value. */ 55 #define EH_RETURN_STACKADJ_RTX \ 56 gen_rtx_MEM (SImode, \ 57 plus_constant (Pmode, \ 58 gen_rtx_REG (Pmode, FRAME_POINTER_REGNUM),\ 59 -4)) 60 61 /* Simple store the return handler into the call frame. */ 62 #define EH_RETURN_HANDLER_RTX \ 63 gen_rtx_MEM (Pmode, \ 64 plus_constant (Pmode, \ 65 gen_rtx_REG (Pmode, FRAME_POINTER_REGNUM),\ 66 16)) 67 68 69 /* The VAX wants no space between the case instruction and the jump table. */ 70 #undef ASM_OUTPUT_BEFORE_CASE_LABEL 71 #define ASM_OUTPUT_BEFORE_CASE_LABEL(FILE, PREFIX, NUM, TABLE) 72 73 #undef SUBTARGET_OVERRIDE_OPTIONS 74 #define SUBTARGET_OVERRIDE_OPTIONS \ 75 do \ 76 { \ 77 /* Turn off function CSE if we're doing PIC. */ \ 78 if (flag_pic) \ 79 flag_no_function_cse = 1; \ 80 } \ 81 while (0) 82 83 /* Don't allow *foo which foo is non-local */ 84 #define NO_EXTERNAL_INDIRECT_ADDRESS 85 86 #undef VAX_CC1_AND_CC1PLUS_SPEC 87 #define VAX_CC1_AND_CC1PLUS_SPEC \ 88 "%{!fno-pic: \ 89 %{!fpic: \ 90 %{!fPIC:-fPIC}}}" 91 92 /* VAX ELF is always gas; override the generic VAX ASM_SPEC. */ 93 94 #undef ASM_SPEC 95 #define ASM_SPEC "%{!fno-pic: %{!mno-asm-pic:-k}}" 96 97 /* We want PCREL dwarf output. */ 98 #define ASM_PREFERRED_EH_DATA_FORMAT(CODE,GLOBAL) \ 99 ((GLOBAL ? DW_EH_PE_indirect : 0) | DW_EH_PE_pcrel | DW_EH_PE_sdata4) 100 101 /* Emit a PC-relative relocation. */ 102 #define ASM_OUTPUT_DWARF_PCREL(FILE, SIZE, LABEL) \ 103 do { \ 104 fputs (integer_asm_op (SIZE, FALSE), FILE); \ 105 fprintf (FILE, "%%pcrel%d(", SIZE * 8); \ 106 assemble_name (FILE, LABEL); \ 107 fputc (')', FILE); \ 108 } while (0) 109