^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 1) // SPDX-License-Identifier: GPL-2.0-only
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 2) /* IEEE754 floating point arithmetic
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 3) * single precision
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 4) */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 5) /*
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 6) * MIPS floating point support
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 7) * Copyright (C) 1994-2000 Algorithmics Ltd.
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 8) */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 9)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 10) #include "ieee754sp.h"
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 11)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 12) union ieee754sp ieee754sp_neg(union ieee754sp x)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 13) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 14) union ieee754sp y;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 15)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 16) if (ieee754_csr.abs2008) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 17) y = x;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 18) SPSIGN(y) = !SPSIGN(x);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 19) } else {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 20) unsigned int oldrm;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 21)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 22) oldrm = ieee754_csr.rm;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 23) ieee754_csr.rm = FPU_CSR_RD;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 24) y = ieee754sp_sub(ieee754sp_zero(0), x);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 25) ieee754_csr.rm = oldrm;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 26) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 27) return y;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 28) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 29)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 30) union ieee754sp ieee754sp_abs(union ieee754sp x)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 31) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 32) union ieee754sp y;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 33)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 34) if (ieee754_csr.abs2008) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 35) y = x;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 36) SPSIGN(y) = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 37) } else {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 38) unsigned int oldrm;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 39)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 40) oldrm = ieee754_csr.rm;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 41) ieee754_csr.rm = FPU_CSR_RD;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 42) if (SPSIGN(x))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 43) y = ieee754sp_sub(ieee754sp_zero(0), x);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 44) else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 45) y = ieee754sp_add(ieee754sp_zero(0), x);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 46) ieee754_csr.rm = oldrm;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 47) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 48) return y;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 49) }