1 /* Software floating-point emulation.
2 Copyright (C) 1997,1998,1999,2000,2002,2003,2005,2006,2007
3 Free Software Foundation, Inc.
4 This file is part of the GNU C Library.
5 Contributed by Richard Henderson (rth@cygnus.com),
6 Jakub Jelinek (jj@ultra.linux.cz),
7 David S. Miller (davem@redhat.com) and
8 Peter Maydell (pmaydell@chiark.greenend.org.uk).
10 The GNU C Library is free software; you can redistribute it and/or
11 modify it under the terms of the GNU Lesser General Public
12 License as published by the Free Software Foundation; either
13 version 2.1 of the License, or (at your option) any later version.
15 In addition to the permissions in the GNU Lesser General Public
16 License, the Free Software Foundation gives you unlimited
17 permission to link the compiled version of this file into
18 combinations with other programs, and to distribute those
19 combinations without any restriction coming from the use of this
20 file. (The Lesser General Public License restrictions do apply in
21 other respects; for example, they cover modification of the file,
22 and distribution when not linked into a combine executable.)
24 The GNU C Library is distributed in the hope that it will be useful,
25 but WITHOUT ANY WARRANTY; without even the implied warranty of
26 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
27 Lesser General Public License for more details.
29 You should have received a copy of the GNU Lesser General Public
30 License along with the GNU C Library; if not, write to the Free
31 Software Foundation, 51 Franklin Street, Fifth Floor, Boston,
32 MA 02110-1301, USA. */
37 #include "sfp-machine.h"
39 /* Allow sfp-machine to have its own byte order definitions. */
44 #error "endianness not defined by sfp-machine.h"
48 #define _FP_WORKBITS 3
49 #define _FP_WORK_LSB ((_FP_W_TYPE)1 << 3)
50 #define _FP_WORK_ROUND ((_FP_W_TYPE)1 << 2)
51 #define _FP_WORK_GUARD ((_FP_W_TYPE)1 << 1)
52 #define _FP_WORK_STICKY ((_FP_W_TYPE)1 << 0)
54 #ifndef FP_RND_NEAREST
55 # define FP_RND_NEAREST 0
56 # define FP_RND_ZERO 1
57 # define FP_RND_PINF 2
58 # define FP_RND_MINF 3
61 # define FP_ROUNDMODE FP_RND_NEAREST
64 /* By default don't care about exceptions. */
66 #define FP_EX_INVALID 0
68 #ifndef FP_EX_OVERFLOW
69 #define FP_EX_OVERFLOW 0
71 #ifndef FP_EX_UNDERFLOW
72 #define FP_EX_UNDERFLOW 0
75 #define FP_EX_DIVZERO 0
78 #define FP_EX_INEXACT 0
81 #define FP_EX_DENORM 0
89 #define FP_DECL_EX int _fex = 0
92 #ifndef FP_INIT_ROUNDMODE
93 #define FP_INIT_ROUNDMODE do {} while (0)
96 #ifndef FP_HANDLE_EXCEPTIONS
97 #define FP_HANDLE_EXCEPTIONS do {} while (0)
100 #ifndef FP_INHIBIT_RESULTS
101 /* By default we write the results always.
102 * sfp-machine may override this and e.g.
103 * check if some exceptions are unmasked
104 * and inhibit it in such a case.
106 #define FP_INHIBIT_RESULTS 0
109 #define FP_SET_EXCEPTION(ex) \
112 #define FP_UNSET_EXCEPTION(ex) \
115 #define FP_CLEAR_EXCEPTIONS \
118 #define _FP_ROUND_NEAREST(wc, X) \
120 if ((_FP_FRAC_LOW_##wc(X) & 15) != _FP_WORK_ROUND) \
121 _FP_FRAC_ADDI_##wc(X, _FP_WORK_ROUND); \
124 #define _FP_ROUND_ZERO(wc, X) (void)0
126 #define _FP_ROUND_PINF(wc, X) \
128 if (!X##_s && (_FP_FRAC_LOW_##wc(X) & 7)) \
129 _FP_FRAC_ADDI_##wc(X, _FP_WORK_LSB); \
132 #define _FP_ROUND_MINF(wc, X) \
134 if (X##_s && (_FP_FRAC_LOW_##wc(X) & 7)) \
135 _FP_FRAC_ADDI_##wc(X, _FP_WORK_LSB); \
138 #define _FP_ROUND(wc, X) \
140 if (_FP_FRAC_LOW_##wc(X) & 7) \
141 FP_SET_EXCEPTION(FP_EX_INEXACT); \
142 switch (FP_ROUNDMODE) \
144 case FP_RND_NEAREST: \
145 _FP_ROUND_NEAREST(wc,X); \
148 _FP_ROUND_ZERO(wc,X); \
151 _FP_ROUND_PINF(wc,X); \
154 _FP_ROUND_MINF(wc,X); \
159 #define FP_CLS_NORMAL 0
160 #define FP_CLS_ZERO 1
164 #define _FP_CLS_COMBINE(x,y) (((x) << 2) | (y))
170 #include "op-common.h"
172 /* Sigh. Silly things longlong.h needs. */
173 #define UWtype _FP_W_TYPE
174 #define W_TYPE_SIZE _FP_W_TYPE_SIZE
176 typedef int QItype __attribute__((mode(QI)));
177 typedef int SItype __attribute__((mode(SI)));
178 typedef int DItype __attribute__((mode(DI)));
179 typedef unsigned int UQItype __attribute__((mode(QI)));
180 typedef unsigned int USItype __attribute__((mode(SI)));
181 typedef unsigned int UDItype __attribute__((mode(DI)));
182 #if _FP_W_TYPE_SIZE == 32
183 typedef unsigned int UHWtype __attribute__((mode(HI)));
184 #elif _FP_W_TYPE_SIZE == 64
185 typedef USItype UHWtype;
192 #define SI_BITS (__CHAR_BIT__ * (int)sizeof(SItype))
193 #define DI_BITS (__CHAR_BIT__ * (int)sizeof(DItype))
196 #include "longlong.h"
202 extern void abort (void);