mirror of
				https://sourceware.org/git/glibc.git
				synced 2025-11-03 20:53:13 +03:00 
			
		
		
		
	
		
			
				
	
	
		
			72 lines
		
	
	
		
			2.4 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			72 lines
		
	
	
		
			2.4 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
/* Implement fmal using soft-fp.
 | 
						|
   Copyright (C) 2013-2025 Free Software Foundation, Inc.
 | 
						|
   This file is part of the GNU C Library.
 | 
						|
 | 
						|
   The GNU C Library is free software; you can redistribute it and/or
 | 
						|
   modify it under the terms of the GNU Lesser General Public
 | 
						|
   License as published by the Free Software Foundation; either
 | 
						|
   version 2.1 of the License, or (at your option) any later version.
 | 
						|
 | 
						|
   In addition to the permissions in the GNU Lesser General Public
 | 
						|
   License, the Free Software Foundation gives you unlimited
 | 
						|
   permission to link the compiled version of this file into
 | 
						|
   combinations with other programs, and to distribute those
 | 
						|
   combinations without any restriction coming from the use of this
 | 
						|
   file.  (The Lesser General Public License restrictions do apply in
 | 
						|
   other respects; for example, they cover modification of the file,
 | 
						|
   and distribution when not linked into a combine executable.)
 | 
						|
 | 
						|
   The GNU C Library is distributed in the hope that it will be useful,
 | 
						|
   but WITHOUT ANY WARRANTY; without even the implied warranty of
 | 
						|
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 | 
						|
   Lesser General Public License for more details.
 | 
						|
 | 
						|
   You should have received a copy of the GNU Lesser General Public
 | 
						|
   License along with the GNU C Library; if not, see
 | 
						|
   <https://www.gnu.org/licenses/>.  */
 | 
						|
 | 
						|
#define NO_MATH_REDIRECT
 | 
						|
#define f64xfmaf128 __hide_f64xfmaf128
 | 
						|
#include <math.h>
 | 
						|
#undef f64xfmaf128
 | 
						|
#include <libc-diag.h>
 | 
						|
#include <libm-alias-ldouble.h>
 | 
						|
#include <math-narrow-alias.h>
 | 
						|
 | 
						|
/* R_e is not set in cases where it is not used in packing, but the
 | 
						|
   compiler does not see that it is set in all cases where it is
 | 
						|
   used, resulting in warnings that it may be used uninitialized.
 | 
						|
   The location of the warning differs in different versions of GCC,
 | 
						|
   it may be where R is defined using a macro or it may be where the
 | 
						|
   macro is defined.  */
 | 
						|
DIAG_PUSH_NEEDS_COMMENT;
 | 
						|
DIAG_IGNORE_NEEDS_COMMENT (4.9, "-Wmaybe-uninitialized");
 | 
						|
 | 
						|
#include "soft-fp.h"
 | 
						|
#include "quad.h"
 | 
						|
 | 
						|
long double
 | 
						|
__fmal (long double a, long double b, long double c)
 | 
						|
{
 | 
						|
  FP_DECL_EX;
 | 
						|
  FP_DECL_Q (A);
 | 
						|
  FP_DECL_Q (B);
 | 
						|
  FP_DECL_Q (C);
 | 
						|
  FP_DECL_Q (R);
 | 
						|
  long double r;
 | 
						|
 | 
						|
  FP_INIT_ROUNDMODE;
 | 
						|
  FP_UNPACK_Q (A, a);
 | 
						|
  FP_UNPACK_Q (B, b);
 | 
						|
  FP_UNPACK_Q (C, c);
 | 
						|
  FP_FMA_Q (R, A, B, C);
 | 
						|
  FP_PACK_Q (r, R);
 | 
						|
  FP_HANDLE_EXCEPTIONS;
 | 
						|
 | 
						|
  return r;
 | 
						|
}
 | 
						|
DIAG_POP_NEEDS_COMMENT;
 | 
						|
 | 
						|
libm_alias_ldouble (__fma, fma)
 | 
						|
libm_alias_ldouble_narrow (__fma, fma)
 |