Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1 | /* IEEE754 floating point arithmetic |
| 2 | * single precision |
| 3 | */ |
| 4 | /* |
| 5 | * MIPS floating point support |
| 6 | * Copyright (C) 1994-2000 Algorithmics Ltd. |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 7 | * |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 8 | * This program is free software; you can distribute it and/or modify it |
| 9 | * under the terms of the GNU General Public License (Version 2) as |
| 10 | * published by the Free Software Foundation. |
| 11 | * |
| 12 | * This program is distributed in the hope it will be useful, but WITHOUT |
| 13 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
| 14 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
| 15 | * for more details. |
| 16 | * |
| 17 | * You should have received a copy of the GNU General Public License along |
| 18 | * with this program; if not, write to the Free Software Foundation, Inc., |
Ralf Baechle | 3f7cac4 | 2014-04-26 01:49:14 +0200 | [diff] [blame] | 19 | * 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 20 | */ |
| 21 | |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 22 | #include "ieee754sp.h" |
| 23 | |
Ralf Baechle | 2209bcb | 2014-04-16 01:31:11 +0200 | [diff] [blame] | 24 | union ieee754sp ieee754sp_neg(union ieee754sp x) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 25 | { |
Maciej W. Rozycki | 232b6ec | 2015-04-03 23:27:43 +0100 | [diff] [blame] | 26 | unsigned int oldrm; |
| 27 | union ieee754sp y; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 28 | |
Maciej W. Rozycki | 232b6ec | 2015-04-03 23:27:43 +0100 | [diff] [blame] | 29 | oldrm = ieee754_csr.rm; |
| 30 | ieee754_csr.rm = FPU_CSR_RD; |
| 31 | y = ieee754sp_sub(ieee754sp_zero(0), x); |
| 32 | ieee754_csr.rm = oldrm; |
| 33 | return y; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 34 | } |
| 35 | |
Ralf Baechle | 2209bcb | 2014-04-16 01:31:11 +0200 | [diff] [blame] | 36 | union ieee754sp ieee754sp_abs(union ieee754sp x) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 37 | { |
Maciej W. Rozycki | 232b6ec | 2015-04-03 23:27:43 +0100 | [diff] [blame] | 38 | unsigned int oldrm; |
| 39 | union ieee754sp y; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 40 | |
Maciej W. Rozycki | 232b6ec | 2015-04-03 23:27:43 +0100 | [diff] [blame] | 41 | oldrm = ieee754_csr.rm; |
| 42 | ieee754_csr.rm = FPU_CSR_RD; |
| 43 | if (SPSIGN(x)) |
| 44 | y = ieee754sp_sub(ieee754sp_zero(0), x); |
| 45 | else |
| 46 | y = ieee754sp_add(ieee754sp_zero(0), x); |
| 47 | ieee754_csr.rm = oldrm; |
| 48 | return y; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 49 | } |