]>
Commit | Line | Data |
---|---|---|
b4c522fa | 1 | /* Subroutines for the D front end on the PowerPC architecture. |
a945c346 | 2 | Copyright (C) 2017-2024 Free Software Foundation, Inc. |
b4c522fa IB |
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 | ||
433b6b12 IB |
18 | #define IN_TARGET_CODE 1 |
19 | ||
b4c522fa IB |
20 | #include "config.h" |
21 | #include "system.h" | |
22 | #include "coretypes.h" | |
23 | #include "tm.h" | |
d5ad6f84 | 24 | #include "tm_d.h" |
b4c522fa IB |
25 | #include "d/d-target.h" |
26 | #include "d/d-target-def.h" | |
27 | ||
28 | /* Implement TARGET_D_CPU_VERSIONS for PowerPC targets. */ | |
29 | ||
30 | void | |
31 | rs6000_d_target_versions (void) | |
32 | { | |
33 | if (TARGET_64BIT) | |
34 | d_add_builtin_version ("PPC64"); | |
35 | else | |
36 | d_add_builtin_version ("PPC"); | |
37 | ||
38 | if (TARGET_HARD_FLOAT) | |
39 | { | |
40 | d_add_builtin_version ("PPC_HardFloat"); | |
41 | d_add_builtin_version ("D_HardFloat"); | |
42 | } | |
43 | else if (TARGET_SOFT_FLOAT) | |
44 | { | |
45 | d_add_builtin_version ("PPC_SoftFloat"); | |
46 | d_add_builtin_version ("D_SoftFloat"); | |
47 | } | |
48 | } | |
3785d2b2 IB |
49 | |
50 | /* Handle a call to `__traits(getTargetInfo, "floatAbi")'. */ | |
51 | ||
52 | static tree | |
53 | rs6000_d_handle_target_float_abi (void) | |
54 | { | |
55 | const char *abi; | |
56 | ||
57 | if (TARGET_HARD_FLOAT) | |
58 | abi = "hard"; | |
59 | else if (TARGET_SOFT_FLOAT) | |
60 | abi = "soft"; | |
61 | else | |
62 | abi = ""; | |
63 | ||
64 | return build_string_literal (strlen (abi) + 1, abi); | |
65 | } | |
66 | ||
d81bc495 IB |
67 | /* Handle a call to `__traits(getTargetInfo, "objectFormat")'. */ |
68 | ||
69 | static tree | |
70 | rs6000_d_handle_target_object_format (void) | |
71 | { | |
72 | const char *objfmt = NULL; | |
73 | ||
74 | if (TARGET_ELF) | |
75 | objfmt = "elf"; | |
76 | else if (TARGET_MACHO) | |
77 | objfmt = "macho"; | |
78 | else if (TARGET_XCOFF) | |
79 | objfmt = "coff"; | |
80 | ||
81 | if (objfmt == NULL) | |
82 | return NULL_TREE; | |
83 | ||
84 | return build_string_literal (strlen (objfmt) + 1, objfmt); | |
85 | } | |
86 | ||
3785d2b2 IB |
87 | /* Implement TARGET_D_REGISTER_CPU_TARGET_INFO. */ |
88 | ||
89 | void | |
90 | rs6000_d_register_target_info (void) | |
91 | { | |
92 | const struct d_target_info_spec handlers[] = { | |
93 | { "floatAbi", rs6000_d_handle_target_float_abi }, | |
d81bc495 | 94 | { "objectFormat", rs6000_d_handle_target_object_format }, |
3785d2b2 IB |
95 | { NULL, NULL }, |
96 | }; | |
97 | ||
98 | d_add_target_info_handlers (handlers); | |
99 | } |