mirror of
				https://sourceware.org/git/glibc.git
				synced 2025-10-30 10:45:40 +03:00 
			
		
		
		
	
		
			
				
	
	
		
			69 lines
		
	
	
		
			1.9 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			69 lines
		
	
	
		
			1.9 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| /* Test fesetexcept: exception traps enabled.
 | |
|    Copyright (C) 2016-2017 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
 | |
|    <http://www.gnu.org/licenses/>.  */
 | |
| 
 | |
| #include <fenv.h>
 | |
| #include <stdio.h>
 | |
| #include <math-tests.h>
 | |
| 
 | |
| static int
 | |
| do_test (void)
 | |
| {
 | |
|   int result = 0;
 | |
| 
 | |
|   fedisableexcept (FE_ALL_EXCEPT);
 | |
|   int ret = feenableexcept (FE_ALL_EXCEPT);
 | |
|   if (!EXCEPTION_ENABLE_SUPPORTED (FE_ALL_EXCEPT) && (ret == -1))
 | |
|     {
 | |
|       puts ("feenableexcept (FE_ALL_EXCEPT) not supported, cannot test");
 | |
|       return 77;
 | |
|     }
 | |
|   else if (ret != 0)
 | |
|     {
 | |
|       puts ("feenableexcept (FE_ALL_EXCEPT) failed");
 | |
|       result = 1;
 | |
|       return result;
 | |
|     }
 | |
| 
 | |
|   if (EXCEPTION_SET_FORCES_TRAP)
 | |
|     {
 | |
|       puts ("setting exceptions traps, cannot test on this architecture");
 | |
|       return 77;
 | |
|     }
 | |
|   /* Verify fesetexcept does not cause exception traps.  */
 | |
|   ret = fesetexcept (FE_ALL_EXCEPT);
 | |
|   if (ret == 0)
 | |
|     puts ("fesetexcept (FE_ALL_EXCEPT) succeeded");
 | |
|   else
 | |
|     {
 | |
|       puts ("fesetexcept (FE_ALL_EXCEPT) failed");
 | |
|       if (EXCEPTION_TESTS (float))
 | |
| 	{
 | |
| 	  puts ("failure of fesetexcept was unexpected");
 | |
| 	  result = 1;
 | |
| 	}
 | |
|       else
 | |
| 	puts ("failure of fesetexcept OK");
 | |
|     }
 | |
|   feclearexcept (FE_ALL_EXCEPT);
 | |
| 
 | |
|   return result;
 | |
| }
 | |
| 
 | |
| #define TEST_FUNCTION do_test ()
 | |
| #include "../test-skeleton.c"
 |