110d565efSmrg /* Software floating-point emulation.
210d565efSmrg Return a - b
3*ec02198aSmrg Copyright (C) 1997-2019 Free Software Foundation, Inc.
410d565efSmrg This file is part of the GNU C Library.
510d565efSmrg Contributed by Richard Henderson (rth@cygnus.com) and
610d565efSmrg Jakub Jelinek (jj@ultra.linux.cz).
710d565efSmrg
810d565efSmrg The GNU C Library is free software; you can redistribute it and/or
910d565efSmrg modify it under the terms of the GNU Lesser General Public
1010d565efSmrg License as published by the Free Software Foundation; either
1110d565efSmrg version 2.1 of the License, or (at your option) any later version.
1210d565efSmrg
1310d565efSmrg In addition to the permissions in the GNU Lesser General Public
1410d565efSmrg License, the Free Software Foundation gives you unlimited
1510d565efSmrg permission to link the compiled version of this file into
1610d565efSmrg combinations with other programs, and to distribute those
1710d565efSmrg combinations without any restriction coming from the use of this
1810d565efSmrg file. (The Lesser General Public License restrictions do apply in
1910d565efSmrg other respects; for example, they cover modification of the file,
2010d565efSmrg and distribution when not linked into a combine executable.)
2110d565efSmrg
2210d565efSmrg The GNU C Library is distributed in the hope that it will be useful,
2310d565efSmrg but WITHOUT ANY WARRANTY; without even the implied warranty of
2410d565efSmrg MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
2510d565efSmrg Lesser General Public License for more details.
2610d565efSmrg
2710d565efSmrg You should have received a copy of the GNU Lesser General Public
2810d565efSmrg License along with the GNU C Library; if not, see
2910d565efSmrg <http://www.gnu.org/licenses/>. */
3010d565efSmrg
3110d565efSmrg #include "soft-fp.h"
3210d565efSmrg #include "quad.h"
3310d565efSmrg
3410d565efSmrg TFtype
__subtf3(TFtype a,TFtype b)3510d565efSmrg __subtf3 (TFtype a, TFtype b)
3610d565efSmrg {
3710d565efSmrg FP_DECL_EX;
3810d565efSmrg FP_DECL_Q (A);
3910d565efSmrg FP_DECL_Q (B);
4010d565efSmrg FP_DECL_Q (R);
4110d565efSmrg TFtype r;
4210d565efSmrg
4310d565efSmrg FP_INIT_ROUNDMODE;
4410d565efSmrg FP_UNPACK_SEMIRAW_Q (A, a);
4510d565efSmrg FP_UNPACK_SEMIRAW_Q (B, b);
4610d565efSmrg FP_SUB_Q (R, A, B);
4710d565efSmrg FP_PACK_SEMIRAW_Q (r, R);
4810d565efSmrg FP_HANDLE_EXCEPTIONS;
4910d565efSmrg
5010d565efSmrg return r;
5110d565efSmrg }
52