1 /* Subroutines for the D front end on the RISC-V architecture. 2 Copyright (C) 2017-2022 Free Software Foundation, Inc. 3 4 GCC is free software; you can redistribute it and/or modify 5 it under the terms of the GNU General Public License as published by 6 the Free Software Foundation; either version 3, or (at your option) 7 any later version. 8 9 GCC is distributed in the hope that it will be useful, 10 but WITHOUT ANY WARRANTY; without even the implied warranty of 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 12 GNU General Public License for more details. 13 14 You should have received a copy of the GNU General Public License 15 along with GCC; see the file COPYING3. If not see 16 <http://www.gnu.org/licenses/>. */ 17 18 #define IN_TARGET_CODE 1 19 20 #include "config.h" 21 #include "system.h" 22 #include "coretypes.h" 23 #include "target.h" 24 #include "tm_d.h" 25 #include "d/d-target.h" 26 #include "d/d-target-def.h" 27 28 /* Implement TARGET_D_CPU_VERSIONS for RISC-V targets. */ 29 30 void riscv_d_target_versions(void)31riscv_d_target_versions (void) 32 { 33 if (TARGET_64BIT) 34 d_add_builtin_version ("RISCV64"); 35 else 36 d_add_builtin_version ("RISCV32"); 37 38 if (TARGET_HARD_FLOAT) 39 d_add_builtin_version ("D_HardFloat"); 40 else 41 d_add_builtin_version ("D_SoftFloat"); 42 } 43 44 /* Handle a call to `__traits(getTargetInfo, "floatAbi")'. */ 45 46 static tree riscv_d_handle_target_float_abi(void)47riscv_d_handle_target_float_abi (void) 48 { 49 const char *abi; 50 51 switch (riscv_abi) 52 { 53 case ABI_ILP32E: 54 case ABI_ILP32: 55 case ABI_LP64: 56 abi = "soft"; 57 break; 58 59 case ABI_ILP32F: 60 case ABI_LP64F: 61 abi = "single"; 62 break; 63 64 case ABI_ILP32D: 65 case ABI_LP64D: 66 abi = "double"; 67 break; 68 69 default: 70 abi = ""; 71 break; 72 } 73 74 return build_string_literal (strlen (abi) + 1, abi); 75 } 76 77 /* Implement TARGET_D_REGISTER_CPU_TARGET_INFO. */ 78 79 void riscv_d_register_target_info(void)80riscv_d_register_target_info (void) 81 { 82 const struct d_target_info_spec handlers[] = { 83 { "floatAbi", riscv_d_handle_target_float_abi }, 84 { NULL, NULL }, 85 }; 86 87 d_add_target_info_handlers (handlers); 88 } 89