1 /* Software floating-point emulation.
2    Return (int)(*a)
3    Copyright (C) 1997-2022 Free Software Foundation, Inc.
4    This file is part of the GNU C Library.
5 
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Lesser General Public
8    License as published by the Free Software Foundation; either
9    version 2.1 of the License, or (at your option) any later version.
10 
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
15 
16    You should have received a copy of the GNU Lesser General Public
17    License along with the GNU C Library; if not, see
18    <https://www.gnu.org/licenses/>.  */
19 
20 #define FP_ROUNDMODE FP_RND_ZERO
21 #include "soft-fp.h"
22 #include "quad.h"
23 
_Qp_qtoi(const long double * a)24 int _Qp_qtoi(const long double *a)
25 {
26   FP_DECL_EX;
27   FP_DECL_Q(A);
28   unsigned int r;
29 
30   FP_INIT_ROUNDMODE;
31   FP_UNPACK_RAW_QP(A, a);
32   FP_TO_INT_Q(r, A, 32, 1);
33   QP_HANDLE_EXCEPTIONS(
34 	int rx;
35 	__asm (
36 "	ldd [%1], %%f52\n"
37 "	ldd [%1+8], %%f54\n"
38 "	fqtoi %%f52, %%f31\n"
39 "	st %%f31, [%0]\n"
40 "	" : : "r" (&rx), "r" (a) : QP_CLOBBER, "f31");
41 	r = rx);
42 
43   return r;
44 }
45