1*38fd1498Szrj /* Fixed-point arithmetic support.
2*38fd1498Szrj Copyright (C) 2006-2018 Free Software Foundation, Inc.
3*38fd1498Szrj
4*38fd1498Szrj This file is part of GCC.
5*38fd1498Szrj
6*38fd1498Szrj GCC is free software; you can redistribute it and/or modify it under
7*38fd1498Szrj the terms of the GNU General Public License as published by the Free
8*38fd1498Szrj Software Foundation; either version 3, or (at your option) any later
9*38fd1498Szrj version.
10*38fd1498Szrj
11*38fd1498Szrj GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12*38fd1498Szrj WARRANTY; without even the implied warranty of MERCHANTABILITY or
13*38fd1498Szrj FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14*38fd1498Szrj for more details.
15*38fd1498Szrj
16*38fd1498Szrj You should have received a copy of the GNU General Public License
17*38fd1498Szrj along with GCC; see the file COPYING3. If not see
18*38fd1498Szrj <http://www.gnu.org/licenses/>. */
19*38fd1498Szrj
20*38fd1498Szrj #ifndef GCC_FIXED_VALUE_H
21*38fd1498Szrj #define GCC_FIXED_VALUE_H
22*38fd1498Szrj
23*38fd1498Szrj struct GTY(()) fixed_value
24*38fd1498Szrj {
25*38fd1498Szrj double_int data; /* Store data up to 2 wide integers. */
26*38fd1498Szrj scalar_mode_pod mode; /* Use machine mode to know IBIT and FBIT. */
27*38fd1498Szrj };
28*38fd1498Szrj
29*38fd1498Szrj #define FIXED_VALUE_TYPE struct fixed_value
30*38fd1498Szrj
31*38fd1498Szrj #define MAX_FCONST0 18 /* For storing 18 fixed-point zeros per
32*38fd1498Szrj fract, ufract, accum, and uaccum modes . */
33*38fd1498Szrj #define MAX_FCONST1 8 /* For storing 8 fixed-point ones per accum
34*38fd1498Szrj and uaccum modes. */
35*38fd1498Szrj /* Constant fixed-point values 0 and 1. */
36*38fd1498Szrj extern FIXED_VALUE_TYPE fconst0[MAX_FCONST0];
37*38fd1498Szrj extern FIXED_VALUE_TYPE fconst1[MAX_FCONST1];
38*38fd1498Szrj
39*38fd1498Szrj /* Macros to access fconst0 and fconst1 via machine modes. */
40*38fd1498Szrj #define FCONST0(mode) fconst0[mode - QQmode]
41*38fd1498Szrj #define FCONST1(mode) fconst1[mode - HAmode]
42*38fd1498Szrj
43*38fd1498Szrj /* Return a CONST_FIXED with value R and mode M. */
44*38fd1498Szrj #define CONST_FIXED_FROM_FIXED_VALUE(r, m) \
45*38fd1498Szrj const_fixed_from_fixed_value (r, m)
46*38fd1498Szrj extern rtx const_fixed_from_fixed_value (FIXED_VALUE_TYPE, machine_mode);
47*38fd1498Szrj
48*38fd1498Szrj /* Construct a FIXED_VALUE from a bit payload and machine mode MODE.
49*38fd1498Szrj The bits in PAYLOAD are sign-extended/zero-extended according to MODE. */
50*38fd1498Szrj extern FIXED_VALUE_TYPE fixed_from_double_int (double_int, scalar_mode);
51*38fd1498Szrj
52*38fd1498Szrj /* Return a CONST_FIXED from a bit payload and machine mode MODE.
53*38fd1498Szrj The bits in PAYLOAD are sign-extended/zero-extended according to MODE. */
54*38fd1498Szrj static inline rtx
const_fixed_from_double_int(double_int payload,scalar_mode mode)55*38fd1498Szrj const_fixed_from_double_int (double_int payload,
56*38fd1498Szrj scalar_mode mode)
57*38fd1498Szrj {
58*38fd1498Szrj return
59*38fd1498Szrj const_fixed_from_fixed_value (fixed_from_double_int (payload, mode),
60*38fd1498Szrj mode);
61*38fd1498Szrj }
62*38fd1498Szrj
63*38fd1498Szrj /* Initialize from a decimal or hexadecimal string. */
64*38fd1498Szrj extern void fixed_from_string (FIXED_VALUE_TYPE *, const char *,
65*38fd1498Szrj scalar_mode);
66*38fd1498Szrj
67*38fd1498Szrj /* In tree.c: wrap up a FIXED_VALUE_TYPE in a tree node. */
68*38fd1498Szrj extern tree build_fixed (tree, FIXED_VALUE_TYPE);
69*38fd1498Szrj
70*38fd1498Szrj /* Extend or truncate to a new mode. */
71*38fd1498Szrj extern bool fixed_convert (FIXED_VALUE_TYPE *, scalar_mode,
72*38fd1498Szrj const FIXED_VALUE_TYPE *, bool);
73*38fd1498Szrj
74*38fd1498Szrj /* Convert to a fixed-point mode from an integer. */
75*38fd1498Szrj extern bool fixed_convert_from_int (FIXED_VALUE_TYPE *, scalar_mode,
76*38fd1498Szrj double_int, bool, bool);
77*38fd1498Szrj
78*38fd1498Szrj /* Convert to a fixed-point mode from a real. */
79*38fd1498Szrj extern bool fixed_convert_from_real (FIXED_VALUE_TYPE *, scalar_mode,
80*38fd1498Szrj const REAL_VALUE_TYPE *, bool);
81*38fd1498Szrj
82*38fd1498Szrj /* Convert to a real mode from a fixed-point. */
83*38fd1498Szrj extern void real_convert_from_fixed (REAL_VALUE_TYPE *, scalar_mode,
84*38fd1498Szrj const FIXED_VALUE_TYPE *);
85*38fd1498Szrj
86*38fd1498Szrj /* Compare two fixed-point objects for bitwise identity. */
87*38fd1498Szrj extern bool fixed_identical (const FIXED_VALUE_TYPE *, const FIXED_VALUE_TYPE *);
88*38fd1498Szrj
89*38fd1498Szrj /* Calculate a hash value. */
90*38fd1498Szrj extern unsigned int fixed_hash (const FIXED_VALUE_TYPE *);
91*38fd1498Szrj
92*38fd1498Szrj #define FIXED_VALUES_IDENTICAL(x, y) fixed_identical (&(x), &(y))
93*38fd1498Szrj
94*38fd1498Szrj /* Determine whether a fixed-point value X is negative. */
95*38fd1498Szrj #define FIXED_VALUE_NEGATIVE(x) fixed_isneg (&(x))
96*38fd1498Szrj
97*38fd1498Szrj /* Render F as a decimal floating point constant. */
98*38fd1498Szrj extern void fixed_to_decimal (char *str, const FIXED_VALUE_TYPE *, size_t);
99*38fd1498Szrj
100*38fd1498Szrj /* Binary or unary arithmetic on tree_code. */
101*38fd1498Szrj extern bool fixed_arithmetic (FIXED_VALUE_TYPE *, int, const FIXED_VALUE_TYPE *,
102*38fd1498Szrj const FIXED_VALUE_TYPE *, bool);
103*38fd1498Szrj
104*38fd1498Szrj /* Compare fixed-point values by tree_code. */
105*38fd1498Szrj extern bool fixed_compare (int, const FIXED_VALUE_TYPE *,
106*38fd1498Szrj const FIXED_VALUE_TYPE *);
107*38fd1498Szrj
108*38fd1498Szrj /* Determine whether a fixed-point value X is negative. */
109*38fd1498Szrj extern bool fixed_isneg (const FIXED_VALUE_TYPE *);
110*38fd1498Szrj
111*38fd1498Szrj #endif /* GCC_FIXED_VALUE_H */
112