1 | /* Software floating-point emulation. |
2 | Truncate IEEE quad into IEEE double |
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 | In addition to the permissions in the GNU Lesser General Public |
12 | License, the Free Software Foundation gives you unlimited |
13 | permission to link the compiled version of this file into |
14 | combinations with other programs, and to distribute those |
15 | combinations without any restriction coming from the use of this |
16 | file. (The Lesser General Public License restrictions do apply in |
17 | other respects; for example, they cover modification of the file, |
18 | and distribution when not linked into a combine executable.) |
19 | |
20 | The GNU C Library is distributed in the hope that it will be useful, |
21 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
22 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
23 | Lesser General Public License for more details. |
24 | |
25 | You should have received a copy of the GNU Lesser General Public |
26 | License along with the GNU C Library; if not, see |
27 | <https://www.gnu.org/licenses/>. */ |
28 | |
29 | #include "soft-fp.h" |
30 | #include "double.h" |
31 | #include "quad.h" |
32 | |
33 | DFtype |
34 | __trunctfdf2 (TFtype a) |
35 | { |
36 | FP_DECL_EX; |
37 | FP_DECL_Q (A); |
38 | FP_DECL_D (R); |
39 | DFtype r; |
40 | |
41 | FP_INIT_ROUNDMODE; |
42 | FP_UNPACK_SEMIRAW_Q (A, a); |
43 | #if _FP_W_TYPE_SIZE < 64 |
44 | FP_TRUNC (D, Q, 2, 4, R, A); |
45 | #else |
46 | FP_TRUNC (D, Q, 1, 2, R, A); |
47 | #endif |
48 | FP_PACK_SEMIRAW_D (r, R); |
49 | FP_HANDLE_EXCEPTIONS; |
50 | |
51 | return r; |
52 | } |
53 | |