xref: /netbsd-src/external/gpl3/gcc/dist/gcc/config/mips/mips-d.cc (revision b1e838363e3c6fc78a55519254d99869742dd33c)
1 /* Subroutines for the D front end on the MIPS 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 "tm.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 MIPS targets.  */
29 
30 void
mips_d_target_versions(void)31 mips_d_target_versions (void)
32 {
33   if (TARGET_64BIT)
34     d_add_builtin_version ("MIPS64");
35   else
36     d_add_builtin_version ("MIPS32");
37 
38   if (mips_abi == ABI_32)
39     d_add_builtin_version ("MIPS_O32");
40   else if (mips_abi == ABI_EABI)
41     d_add_builtin_version ("MIPS_EABI");
42   else if (mips_abi == ABI_N32)
43     d_add_builtin_version ("MIPS_N32");
44   else if (mips_abi == ABI_64)
45     d_add_builtin_version ("MIPS_N64");
46   else if (mips_abi == ABI_O64)
47     d_add_builtin_version ("MIPS_O64");
48 
49   if (TARGET_HARD_FLOAT_ABI)
50     {
51       d_add_builtin_version ("MIPS_HardFloat");
52       d_add_builtin_version ("D_HardFloat");
53     }
54   else if (TARGET_SOFT_FLOAT_ABI)
55     {
56       d_add_builtin_version ("MIPS_SoftFloat");
57       d_add_builtin_version ("D_SoftFloat");
58     }
59 }
60 
61 /* Handle a call to `__traits(getTargetInfo, "floatAbi")'.  */
62 
63 static tree
mips_d_handle_target_float_abi(void)64 mips_d_handle_target_float_abi (void)
65 {
66   const char *abi;
67 
68   if (TARGET_HARD_FLOAT_ABI)
69     abi = "hard";
70   else if (TARGET_SOFT_FLOAT_ABI)
71     abi = "soft";
72   else
73     abi = "";
74 
75   return build_string_literal (strlen (abi) + 1, abi);
76 }
77 
78 /* Implement TARGET_D_REGISTER_CPU_TARGET_INFO.  */
79 
80 void
mips_d_register_target_info(void)81 mips_d_register_target_info (void)
82 {
83   const struct d_target_info_spec handlers[] = {
84     { "floatAbi", mips_d_handle_target_float_abi },
85     { NULL, NULL },
86   };
87 
88   d_add_target_info_handlers (handlers);
89 }
90