]> git.ipfire.org Git - thirdparty/glibc.git/blob - sysdeps/sparc/sparc32/soft-fp/q_flt.c
Moved from soft-fp/sysdeps/sparc/sparc32/q_itoq.c
[thirdparty/glibc.git] / sysdeps / sparc / sparc32 / soft-fp / q_flt.c
1 /* Software floating-point emulation.
2 Return 1 if a < b
3 Copyright (C) 1997,1999 Free Software Foundation, Inc.
4 This file is part of the GNU C Library.
5 Contributed by Richard Henderson (rth@cygnus.com) and
6 Jakub Jelinek (jj@ultra.linux.cz).
7
8 The GNU C Library is free software; you can redistribute it and/or
9 modify it under the terms of the GNU Library General Public License as
10 published by the Free Software Foundation; either version 2 of the
11 License, or (at your option) any later version.
12
13 The GNU C Library is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 Library General Public License for more details.
17
18 You should have received a copy of the GNU Library General Public
19 License along with the GNU C Library; see the file COPYING.LIB. If
20 not, write to the Free Software Foundation, Inc.,
21 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
22
23 #include "soft-fp.h"
24 #include "quad.h"
25
26 int _Q_flt(const long double a, const long double b)
27 {
28 FP_DECL_EX;
29 FP_DECL_Q(A); FP_DECL_Q(B);
30 int r;
31
32 FP_UNPACK_RAW_Q(A, a);
33 FP_UNPACK_RAW_Q(B, b);
34 FP_CMP_Q(r, B, A, 3);
35 if (r == 3)
36 FP_SET_EXCEPTION(FP_EX_INVALID);
37 FP_HANDLE_EXCEPTIONS;
38
39 return (r == 1);
40 }