]>
Commit | Line | Data |
---|---|---|
ac5e69da | 1 | /* Definitions for simple data type for positive real numbers. |
46c5ad27 | 2 | Copyright (C) 2002, 2003 Free Software Foundation, Inc. |
ac5e69da JZ |
3 | |
4 | This file is part of GCC. | |
5 | ||
6 | GCC is free software; you can redistribute it and/or modify it under | |
7 | the terms of the GNU General Public License as published by the Free | |
8 | Software Foundation; either version 2, or (at your option) any later | |
9 | version. | |
10 | ||
11 | GCC is distributed in the hope that it will be useful, but WITHOUT ANY | |
12 | WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
13 | FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
14 | for more details. | |
15 | ||
16 | You should have received a copy of the GNU General Public License | |
17 | along with GCC; see the file COPYING. If not, write to the Free | |
18 | Software Foundation, 59 Temple Place - Suite 330, Boston, MA | |
19 | 02111-1307, USA. */ | |
20 | ||
21 | #ifndef GCC_SREAL_H | |
22 | #define GCC_SREAL_H | |
23 | ||
24 | /* SREAL_PART_BITS has to be an even number. */ | |
25 | #if (HOST_BITS_PER_WIDE_INT / 2) % 2 == 1 | |
26 | #define SREAL_PART_BITS (HOST_BITS_PER_WIDE_INT / 2 - 1) | |
27 | #else | |
28 | #define SREAL_PART_BITS (HOST_BITS_PER_WIDE_INT / 2) | |
29 | #endif | |
30 | ||
31 | #define uhwi unsigned HOST_WIDE_INT | |
32 | #define MAX_HOST_WIDE_INT (((uhwi) 1 << (HOST_BITS_PER_WIDE_INT - 1)) - 1) | |
33 | ||
34 | #define SREAL_MIN_SIG ((uhwi) 1 << (SREAL_PART_BITS - 1)) | |
35 | #define SREAL_MAX_SIG (((uhwi) 1 << SREAL_PART_BITS) - 1) | |
36 | #define SREAL_MAX_EXP (INT_MAX / 4) | |
37 | ||
38 | #if SREAL_PART_BITS < 32 | |
39 | #define SREAL_BITS (SREAL_PART_BITS * 2) | |
40 | #else | |
41 | #define SREAL_BITS SREAL_PART_BITS | |
42 | #endif | |
43 | ||
44 | /* Structure for holding a simple real number. */ | |
45 | typedef struct sreal | |
46 | { | |
47 | #if SREAL_PART_BITS < 32 | |
48 | unsigned HOST_WIDE_INT sig_lo; /* Significant (lower part). */ | |
49 | unsigned HOST_WIDE_INT sig_hi; /* Significant (higher part). */ | |
50 | #else | |
51 | unsigned HOST_WIDE_INT sig; /* Significant. */ | |
52 | #endif | |
53 | signed int exp; /* Exponent. */ | |
54 | } sreal; | |
55 | ||
46c5ad27 AJ |
56 | extern void dump_sreal (FILE *, sreal *); |
57 | extern sreal *sreal_init (sreal *, unsigned HOST_WIDE_INT, signed int); | |
58 | extern HOST_WIDE_INT sreal_to_int (sreal *); | |
59 | extern int sreal_compare (sreal *, sreal *); | |
60 | extern sreal *sreal_add (sreal *, sreal *, sreal *); | |
61 | extern sreal *sreal_sub (sreal *, sreal *, sreal *); | |
62 | extern sreal *sreal_mul (sreal *, sreal *, sreal *); | |
63 | extern sreal *sreal_div (sreal *, sreal *, sreal *); | |
ac5e69da JZ |
64 | |
65 | #endif |