1/* Target definitions for GNU compiler for VAX using ELF 2 Copyright (C) 2002-2020 Free Software Foundation, Inc. 3 Contributed by Matt Thomas <matt@3am-software.com> 4 5This file is part of GCC. 6 7GCC is free software; you can redistribute it and/or modify 8it under the terms of the GNU General Public License as published by 9the Free Software Foundation; either version 3, or (at your option) 10any later version. 11 12GCC is distributed in the hope that it will be useful, 13but WITHOUT ANY WARRANTY; without even the implied warranty of 14MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15GNU General Public License for more details. 16 17You should have received a copy of the GNU General Public License 18along 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 DWARF Canonical Frame 49 Address. */ 50#undef FRAME_POINTER_CFA_OFFSET 51#define FRAME_POINTER_CFA_OFFSET(FNDECL) 0 52 53/* We use R2-R5 (call-clobbered) registers for exceptions. */ 54#define EH_RETURN_DATA_REGNO(N) ((N) < 4 ? (N) + 2 : INVALID_REGNUM) 55 56/* Place the top of the stack for the DWARF2 EH stackadj value. */ 57#define EH_RETURN_STACKADJ_RTX \ 58 gen_rtx_MEM (SImode, \ 59 plus_constant (Pmode, \ 60 gen_rtx_REG (Pmode, FRAME_POINTER_REGNUM),\ 61 -1 * UNITS_PER_WORD)) 62 63/* Simple store the return handler into the call frame. */ 64#define EH_RETURN_HANDLER_RTX \ 65 gen_rtx_MEM (Pmode, \ 66 plus_constant (Pmode, \ 67 gen_rtx_REG (Pmode, FRAME_POINTER_REGNUM),\ 68 RETURN_ADDRESS_OFFSET)) 69 70 71/* The VAX wants no space between the case instruction and the jump table. */ 72#undef ASM_OUTPUT_BEFORE_CASE_LABEL 73#define ASM_OUTPUT_BEFORE_CASE_LABEL(FILE, PREFIX, NUM, TABLE) 74 75#undef SUBTARGET_OVERRIDE_OPTIONS 76#define SUBTARGET_OVERRIDE_OPTIONS \ 77 do \ 78 { \ 79 /* Turn off function CSE if we're doing PIC. */ \ 80 if (flag_pic) \ 81 flag_no_function_cse = 1; \ 82 } \ 83 while (0) 84 85/* Don't allow *foo which foo is non-local */ 86#define NO_EXTERNAL_INDIRECT_ADDRESS 87 88#undef VAX_CC1_AND_CC1PLUS_SPEC 89#define VAX_CC1_AND_CC1PLUS_SPEC \ 90 "%{!fno-pic: \ 91 %{!fpic: \ 92 %{!fPIC:-fPIC}}}" 93 94/* VAX ELF is always gas; override the generic VAX ASM_SPEC. */ 95 96#undef ASM_SPEC 97#define ASM_SPEC "%{!fno-pic: %{!mno-asm-pic:-k}}" 98 99/* We want PCREL dwarf output. */ 100#define ASM_PREFERRED_EH_DATA_FORMAT(CODE,GLOBAL) \ 101 ((GLOBAL ? DW_EH_PE_indirect : 0) | DW_EH_PE_pcrel | DW_EH_PE_sdata4) 102 103/* Emit a PC-relative relocation. */ 104#define ASM_OUTPUT_DWARF_PCREL(FILE, SIZE, LABEL) \ 105 do { \ 106 fputs (integer_asm_op (SIZE, FALSE), FILE); \ 107 fprintf (FILE, "%%pcrel%d(", SIZE * 8); \ 108 assemble_name (FILE, LABEL); \
|