mirror of
				https://sourceware.org/git/glibc.git
				synced 2025-10-27 12:15:39 +03:00 
			
		
		
		
	
		
			
				
	
	
		
			56 lines
		
	
	
		
			1.5 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			56 lines
		
	
	
		
			1.5 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| /* Subtract long double (ldbl-128) values, narrowing the result to
 | |
|    float, using soft-fp.
 | |
|    Copyright (C) 2018-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.
 | |
| 
 | |
|    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 f32subf64x __hide_f32subf64x
 | |
| #define f32subf128 __hide_f32subf128
 | |
| #include <math.h>
 | |
| #undef f32subf64x
 | |
| #undef f32subf128
 | |
| 
 | |
| #include <math-narrow.h>
 | |
| #include <soft-fp.h>
 | |
| #include <single.h>
 | |
| #include <quad.h>
 | |
| 
 | |
| float
 | |
| __fsubl (_Float128 x, _Float128 y)
 | |
| {
 | |
|   FP_DECL_EX;
 | |
|   FP_DECL_Q (X);
 | |
|   FP_DECL_Q (Y);
 | |
|   FP_DECL_Q (R);
 | |
|   FP_DECL_S (RN);
 | |
|   float ret;
 | |
| 
 | |
|   FP_INIT_ROUNDMODE;
 | |
|   FP_UNPACK_SEMIRAW_Q (X, x);
 | |
|   FP_UNPACK_SEMIRAW_Q (Y, y);
 | |
|   FP_SUB_Q (R, X, Y);
 | |
| #if _FP_W_TYPE_SIZE < 64
 | |
|   FP_TRUNC (S, Q, 1, 4, RN, R);
 | |
| #else
 | |
|   FP_TRUNC (S, Q, 1, 2, RN, R);
 | |
| #endif
 | |
|   FP_PACK_SEMIRAW_S (ret, RN);
 | |
|   FP_HANDLE_EXCEPTIONS;
 | |
|   CHECK_NARROW_SUB (ret, x, y);
 | |
|   return ret;
 | |
| }
 | |
| libm_alias_float_ldouble (sub)
 |