projects / deliverable / linux.git / blame
| Commit | Line | Data |
|---|---|---|
| 1da177e4 LT |
1 | /* |
| 2 | * IEEE754 floating point | |
| 3 | * double precision internal header file | |
| 4 | */ | |
| 5 | /* | |
| 6 | * MIPS floating point support | |
| 7 | * Copyright (C) 1994-2000 Algorithmics Ltd. | |
| 1da177e4 | 8 | * |
| 1da177e4 LT |
9 | * This program is free software; you can distribute it and/or modify it |
| 10 | * under the terms of the GNU General Public License (Version 2) as | |
| 11 | * published by the Free Software Foundation. | |
| 12 | * | |
| 13 | * This program is distributed in the hope it will be useful, but WITHOUT | |
| 14 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 15 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
| 16 | * for more details. | |
| 17 | * | |
| 18 | * You should have received a copy of the GNU General Public License along | |
| 19 | * with this program; if not, write to the Free Software Foundation, Inc., | |
| 3f7cac41 | 20 | * 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
| 1da177e4 LT |
21 | */ |
| 22 | ||
| cae55066 | 23 | #include <linux/compiler.h> |
| 1da177e4 LT |
24 | |
| 25 | #include "ieee754int.h" | |
| 26 | ||
| 27 | #define assert(expr) ((void)0) | |
| 28 | ||
| b3a7ad2b RB |
29 | #define SP_EBIAS 127 |
| 30 | #define SP_EMIN (-126) | |
| 31 | #define SP_EMAX 127 | |
| 32 | #define SP_FBITS 23 | |
| 33 | #define SP_MBITS 23 | |
| 34 | ||
| 35 | #define SP_MBIT(x) ((u32)1 << (x)) | |
| 36 | #define SP_HIDDEN_BIT SP_MBIT(SP_FBITS) | |
| 37 | #define SP_SIGN_BIT SP_MBIT(31) | |
| 38 | ||
| 49548b09 RB |
39 | #define SPSIGN(sp) (sp.sign) |
| 40 | #define SPBEXP(sp) (sp.bexp) | |
| 41 | #define SPMANT(sp) (sp.mant) | |
| b3a7ad2b | 42 | |
| 3a33db23 RB |
43 | static inline int ieee754sp_finite(union ieee754sp x) |
| 44 | { | |
| 45 | return SPBEXP(x) != SP_EMAX + 1 + SP_EBIAS; | |
| 46 | } | |
| 47 | ||
| 1da177e4 | 48 | /* 3bit extended single precision sticky right shift */ |
| db57f29d PB |
49 | #define XSPSRS(v, rs) \ |
| 50 | ((rs > (SP_FBITS+3))?1:((v) >> (rs)) | ((v) << (32-(rs)) != 0)) | |
| 1da177e4 | 51 | |
| db57f29d PB |
52 | #define XSPSRS1(m) \ |
| 53 | ((m >> 1) | (m & 1)) | |
| 1da177e4 | 54 | |
| db57f29d PB |
55 | #define SPXSRSX1() \ |
| 56 | (xe++, (xm = XSPSRS1(xm))) | |
| 1da177e4 LT |
57 | |
| 58 | #define SPXSRSY1() \ | |
| db57f29d | 59 | (ye++, (ym = XSPSRS1(ym))) |
| 1da177e4 LT |
60 | |
| 61 | /* convert denormal to normalized with extended exponent */ | |
| 62 | #define SPDNORMx(m,e) \ | |
| ad8fb553 | 63 | while ((m >> SP_FBITS) == 0) { m <<= 1; e--; } |
| 21a151d8 RB |
64 | #define SPDNORMX SPDNORMx(xm, xe) |
| 65 | #define SPDNORMY SPDNORMx(ym, ye) | |
| e2d11e1a | 66 | #define SPDNORMZ SPDNORMx(zm, ze) |
| 1da177e4 | 67 | |
| 2209bcb1 | 68 | static inline union ieee754sp buildsp(int s, int bx, unsigned m) |
| 1da177e4 | 69 | { |
| 2209bcb1 | 70 | union ieee754sp r; |
| 1da177e4 LT |
71 | |
| 72 | assert((s) == 0 || (s) == 1); | |
| 73 | assert((bx) >= SP_EMIN - 1 + SP_EBIAS | |
| 74 | && (bx) <= SP_EMAX + 1 + SP_EBIAS); | |
| ad8fb553 | 75 | assert(((m) >> SP_FBITS) == 0); |
| 1da177e4 | 76 | |
| 49548b09 RB |
77 | r.sign = s; |
| 78 | r.bexp = bx; | |
| 79 | r.mant = m; | |
| 1da177e4 LT |
80 | |
| 81 | return r; | |
| 82 | } | |
| 83 | ||
| 90efba36 | 84 | extern union ieee754sp __cold ieee754sp_nanxcpt(union ieee754sp); |
| 2209bcb1 | 85 | extern union ieee754sp ieee754sp_format(int, int, unsigned); |