162306a36Sopenharmony_ci// SPDX-License-Identifier: GPL-2.0-only 262306a36Sopenharmony_ci/* IEEE754 floating point arithmetic 362306a36Sopenharmony_ci * single precision 462306a36Sopenharmony_ci */ 562306a36Sopenharmony_ci/* 662306a36Sopenharmony_ci * MIPS floating point support 762306a36Sopenharmony_ci * Copyright (C) 1994-2000 Algorithmics Ltd. 862306a36Sopenharmony_ci */ 962306a36Sopenharmony_ci 1062306a36Sopenharmony_ci#include "ieee754sp.h" 1162306a36Sopenharmony_ci 1262306a36Sopenharmony_ciunion ieee754sp ieee754sp_fint(int x) 1362306a36Sopenharmony_ci{ 1462306a36Sopenharmony_ci unsigned int xm; 1562306a36Sopenharmony_ci int xe; 1662306a36Sopenharmony_ci int xs; 1762306a36Sopenharmony_ci 1862306a36Sopenharmony_ci ieee754_clearcx(); 1962306a36Sopenharmony_ci 2062306a36Sopenharmony_ci if (x == 0) 2162306a36Sopenharmony_ci return ieee754sp_zero(0); 2262306a36Sopenharmony_ci if (x == 1 || x == -1) 2362306a36Sopenharmony_ci return ieee754sp_one(x < 0); 2462306a36Sopenharmony_ci if (x == 10 || x == -10) 2562306a36Sopenharmony_ci return ieee754sp_ten(x < 0); 2662306a36Sopenharmony_ci 2762306a36Sopenharmony_ci xs = (x < 0); 2862306a36Sopenharmony_ci if (xs) { 2962306a36Sopenharmony_ci if (x == (1 << 31)) 3062306a36Sopenharmony_ci xm = ((unsigned) 1 << 31); /* max neg can't be safely negated */ 3162306a36Sopenharmony_ci else 3262306a36Sopenharmony_ci xm = -x; 3362306a36Sopenharmony_ci } else { 3462306a36Sopenharmony_ci xm = x; 3562306a36Sopenharmony_ci } 3662306a36Sopenharmony_ci xe = SP_FBITS + 3; 3762306a36Sopenharmony_ci 3862306a36Sopenharmony_ci if (xm >> (SP_FBITS + 1 + 3)) { 3962306a36Sopenharmony_ci /* shunt out overflow bits 4062306a36Sopenharmony_ci */ 4162306a36Sopenharmony_ci while (xm >> (SP_FBITS + 1 + 3)) { 4262306a36Sopenharmony_ci SPXSRSX1(); 4362306a36Sopenharmony_ci } 4462306a36Sopenharmony_ci } else { 4562306a36Sopenharmony_ci /* normalize in grs extended single precision 4662306a36Sopenharmony_ci */ 4762306a36Sopenharmony_ci while ((xm >> (SP_FBITS + 3)) == 0) { 4862306a36Sopenharmony_ci xm <<= 1; 4962306a36Sopenharmony_ci xe--; 5062306a36Sopenharmony_ci } 5162306a36Sopenharmony_ci } 5262306a36Sopenharmony_ci return ieee754sp_format(xs, xe, xm); 5362306a36Sopenharmony_ci} 54