1/* Definitions of target machine for GNU compiler, for HPs using the
2   64bit runtime model.
3   Copyright (C) 1999-2022 Free Software Foundation, Inc.
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/* The default sizes for basic datatypes provided by GCC are not
22   correct for the PA64 runtime architecture.
23
24   In PA64, basic types have the following sizes
25
26     char	1 byte
27     short	2 bytes
28     int	4 bytes
29     long	8 bytes
30     long long	8 bytes
31     pointer	8 bytes
32     float	4 bytes
33     double	8 bytes
34     long double 16 bytes
35     size_t	8 bytes
36     ptrdiff_t	8 bytes
37     wchar	4 bytes
38
39  Make GCC agree with types.h.  */
40#undef SIZE_TYPE
41#define SIZE_TYPE "long unsigned int"
42
43#undef PTRDIFF_TYPE
44#define PTRDIFF_TYPE "long int"
45
46#undef WCHAR_TYPE
47#define WCHAR_TYPE "unsigned int"
48
49#undef WCHAR_TYPE_SIZE
50#define WCHAR_TYPE_SIZE 32
51
52/* If it is not listed here, then the default selected by GCC is OK.  */
53#undef SHORT_TYPE_SIZE
54#define SHORT_TYPE_SIZE 16
55#undef INT_TYPE_SIZE
56#define INT_TYPE_SIZE 32
57#undef LONG_TYPE_SIZE
58#define LONG_TYPE_SIZE 64
59#undef LONG_LONG_TYPE_SIZE
60#define LONG_LONG_TYPE_SIZE 64
61#undef FLOAT_TYPE_SIZE
62#define FLOAT_TYPE_SIZE 32
63#undef DOUBLE_TYPE_SIZE
64#define DOUBLE_TYPE_SIZE 64
65#undef LONG_DOUBLE_TYPE_SIZE
66#define LONG_DOUBLE_TYPE_SIZE 128
67
68/* Temporary until we figure out what to do with those *(&@$ 32bit
69   relocs which appear in stabs.  */
70#undef DBX_DEBUGGING_INFO
71
72/* ?!? This needs to be made compile-time selectable.
73
74   The PA64 runtime model has arguments that grow to higher addresses
75   (like most other targets).  The older runtime model has arguments
76   that grow to lower addresses.  What fun.  */
77#undef ARGS_GROW_DOWNWARD
78
79/* If defined, a C expression which determines whether the default
80   implementation of va_arg will attempt to pad down before reading the
81   next argument, if that argument is smaller than its aligned space as
82   controlled by PARM_BOUNDARY.  If this macro is not defined, all such
83   arguments are padded down when BYTES_BIG_ENDIAN is true.  We don't
84   want aggregates padded down.  */
85
86#define PAD_VARARGS_DOWN \
87  (!AGGREGATE_TYPE_P (type) \
88   && TREE_CODE (type) != COMPLEX_TYPE \
89   && TREE_CODE (type) != VECTOR_TYPE)
90
91/* In the PA architecture, it is not possible to directly move data
92   between GENERAL_REGS and FP_REGS.  On the 32-bit port, we use the
93   location at SP-16 because PA 1.X only supports 5-bit immediates for
94   floating-point loads and stores.  We don't expose this location in
95   the RTL to avoid scheduling related problems.  For example, the
96   store and load could be separated by a call to a pure or const
97   function which has no frame and this function might also use SP-16.
98   We have 14-bit immediates on the 64-bit port, so we use secondary
99   memory for the copies.  */
100#define PA_SECONDARY_MEMORY_NEEDED(MODE, CLASS1, CLASS2) \
101  (MAYBE_FP_REG_CLASS_P (CLASS1) != FP_REG_CLASS_P (CLASS2)		\
102   || MAYBE_FP_REG_CLASS_P (CLASS2) != FP_REG_CLASS_P (CLASS1))
103
104