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