forked from Qortal/Brooklyn
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
83 lines
2.9 KiB
83 lines
2.9 KiB
// SPDX-License-Identifier: GPL-2.0-only |
|
/* ieee754 floating point arithmetic |
|
* single and double precision |
|
* |
|
* BUGS |
|
* not much dp done |
|
* doesn't generate IEEE754_INEXACT |
|
*/ |
|
/* |
|
* MIPS floating point support |
|
* Copyright (C) 1994-2000 Algorithmics Ltd. |
|
*/ |
|
|
|
#include <linux/compiler.h> |
|
|
|
#include "ieee754.h" |
|
#include "ieee754sp.h" |
|
#include "ieee754dp.h" |
|
|
|
/* |
|
* Special constants |
|
*/ |
|
|
|
/* |
|
* Older GCC requires the inner braces for initialization of union ieee754dp's |
|
* anonymous struct member. Without an error will result. |
|
*/ |
|
#define xPCNST(s, b, m, ebias) \ |
|
{ \ |
|
{ \ |
|
.sign = (s), \ |
|
.bexp = (b) + ebias, \ |
|
.mant = (m) \ |
|
} \ |
|
} |
|
|
|
#define DPCNST(s, b, m) \ |
|
xPCNST(s, b, m, DP_EBIAS) |
|
|
|
const union ieee754dp __ieee754dp_spcvals[] = { |
|
DPCNST(0, DP_EMIN - 1, 0x0000000000000ULL), /* + zero */ |
|
DPCNST(1, DP_EMIN - 1, 0x0000000000000ULL), /* - zero */ |
|
DPCNST(0, 0, 0x0000000000000ULL), /* + 1.0 */ |
|
DPCNST(1, 0, 0x0000000000000ULL), /* - 1.0 */ |
|
DPCNST(0, 3, 0x4000000000000ULL), /* + 10.0 */ |
|
DPCNST(1, 3, 0x4000000000000ULL), /* - 10.0 */ |
|
DPCNST(0, DP_EMAX + 1, 0x0000000000000ULL), /* + infinity */ |
|
DPCNST(1, DP_EMAX + 1, 0x0000000000000ULL), /* - infinity */ |
|
DPCNST(0, DP_EMAX + 1, 0x7FFFFFFFFFFFFULL), /* + ind legacy qNaN */ |
|
DPCNST(0, DP_EMAX + 1, 0x8000000000000ULL), /* + indef 2008 qNaN */ |
|
DPCNST(0, DP_EMAX, 0xFFFFFFFFFFFFFULL), /* + max */ |
|
DPCNST(1, DP_EMAX, 0xFFFFFFFFFFFFFULL), /* - max */ |
|
DPCNST(0, DP_EMIN, 0x0000000000000ULL), /* + min normal */ |
|
DPCNST(1, DP_EMIN, 0x0000000000000ULL), /* - min normal */ |
|
DPCNST(0, DP_EMIN - 1, 0x0000000000001ULL), /* + min denormal */ |
|
DPCNST(1, DP_EMIN - 1, 0x0000000000001ULL), /* - min denormal */ |
|
DPCNST(0, 31, 0x0000000000000ULL), /* + 1.0e31 */ |
|
DPCNST(0, 63, 0x0000000000000ULL), /* + 1.0e63 */ |
|
}; |
|
|
|
#define SPCNST(s, b, m) \ |
|
xPCNST(s, b, m, SP_EBIAS) |
|
|
|
const union ieee754sp __ieee754sp_spcvals[] = { |
|
SPCNST(0, SP_EMIN - 1, 0x000000), /* + zero */ |
|
SPCNST(1, SP_EMIN - 1, 0x000000), /* - zero */ |
|
SPCNST(0, 0, 0x000000), /* + 1.0 */ |
|
SPCNST(1, 0, 0x000000), /* - 1.0 */ |
|
SPCNST(0, 3, 0x200000), /* + 10.0 */ |
|
SPCNST(1, 3, 0x200000), /* - 10.0 */ |
|
SPCNST(0, SP_EMAX + 1, 0x000000), /* + infinity */ |
|
SPCNST(1, SP_EMAX + 1, 0x000000), /* - infinity */ |
|
SPCNST(0, SP_EMAX + 1, 0x3FFFFF), /* + indef legacy quiet NaN */ |
|
SPCNST(0, SP_EMAX + 1, 0x400000), /* + indef 2008 quiet NaN */ |
|
SPCNST(0, SP_EMAX, 0x7FFFFF), /* + max normal */ |
|
SPCNST(1, SP_EMAX, 0x7FFFFF), /* - max normal */ |
|
SPCNST(0, SP_EMIN, 0x000000), /* + min normal */ |
|
SPCNST(1, SP_EMIN, 0x000000), /* - min normal */ |
|
SPCNST(0, SP_EMIN - 1, 0x000001), /* + min denormal */ |
|
SPCNST(1, SP_EMIN - 1, 0x000001), /* - min denormal */ |
|
SPCNST(0, 31, 0x000000), /* + 1.0e31 */ |
|
SPCNST(0, 63, 0x000000), /* + 1.0e63 */ |
|
};
|
|
|