Lines Matching +full:- +full:single +full:- +full:end
1 // SPDX-License-Identifier: GPL-2.0-or-later
3 * Linux/PA-RISC Project (http://www.parisc-linux.org/)
5 * Floating-point emulation code
6 * Copyright (C) 2001 Hewlett-Packard (Paul Bame) <bame@debian.org>
15 * Single_add: add two single precision values.
33 * Single_add: add two single precision values.
118 } /* End left NaN or Infinity processing */ in sgl_fadd()
146 } /* End right NaN or Infinity processing */ in sgl_fadd()
259 diff_exponent = result_exponent - right_exponent; in sgl_fadd()
292 * needed. If only a single shift is needed then the guard in sgl_fadd()
294 * must participate in the rounding. If more than a single in sgl_fadd()
305 /* Must have been "x-x" or "x+(-x)". */ in sgl_fadd()
311 result_exponent--; in sgl_fadd()
347 if((result_exponent -= 8) <= 0 && !underflowtrap) in sgl_fadd()
355 if((result_exponent -= 4) <= 0 && !underflowtrap) in sgl_fadd()
375 result_exponent -= 3; in sgl_fadd()
382 result_exponent -= 2; in sgl_fadd()
391 result_exponent -= 1; in sgl_fadd()
415 Sgl_right_align(result,/*by*/(1-result_exponent),extent); in sgl_fadd()
420 } /* end if(hidden...)... */ in sgl_fadd()
422 } /* end if(save < 0)... */ in sgl_fadd()
433 } /* end if hiddenoverflow... */ in sgl_fadd()
434 } /* end else ...add magnitudes... */ in sgl_fadd()
476 } /* end switch... */ in sgl_fadd()