1 /* $NetBSD: setovfl.c,v 1.5 2006/11/27 07:22:07 skrll Exp $ */ 2 3 /* $OpenBSD: setovfl.c,v 1.4 2001/03/29 03:58:19 mickey Exp $ */ 4 5 /* 6 * Copyright 1996 1995 by Open Software Foundation, Inc. 7 * All Rights Reserved 8 * 9 * Permission to use, copy, modify, and distribute this software and 10 * its documentation for any purpose and without fee is hereby granted, 11 * provided that the above copyright notice appears in all copies and 12 * that both the copyright notice and this permission notice appear in 13 * supporting documentation. 14 * 15 * OSF DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE 16 * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS 17 * FOR A PARTICULAR PURPOSE. 18 * 19 * IN NO EVENT SHALL OSF BE LIABLE FOR ANY SPECIAL, INDIRECT, OR 20 * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM 21 * LOSS OF USE, DATA OR PROFITS, WHETHER IN ACTION OF CONTRACT, 22 * NEGLIGENCE, OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION 23 * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 24 * 25 */ 26 /* 27 * pmk1.1 28 */ 29 /* 30 * (c) Copyright 1986 HEWLETT-PACKARD COMPANY 31 * 32 * To anyone who acknowledges that this file is provided "AS IS" 33 * without any express or implied warranty: 34 * permission to use, copy, modify, and distribute this file 35 * for any purpose is hereby granted without fee, provided that 36 * the above copyright notice and this notice appears in all 37 * copies, and that the name of Hewlett-Packard Company not be 38 * used in advertising or publicity pertaining to distribution 39 * of the software without specific, written prior permission. 40 * Hewlett-Packard Company makes no representations about the 41 * suitability of this software for any purpose. 42 */ 43 44 #include <sys/cdefs.h> 45 __KERNEL_RCSID(0, "$NetBSD: setovfl.c,v 1.5 2006/11/27 07:22:07 skrll Exp $"); 46 47 #include "../spmath/float.h" 48 #include "../spmath/sgl_float.h" 49 #include "../spmath/dbl_float.h" 50 51 sgl_floating_point 52 sgl_setoverflow(sign) 53 unsigned int sign; 54 { 55 sgl_floating_point result; 56 57 /* set result to infinity or largest number */ 58 #if 0 59 switch (Rounding_mode()) { 60 case ROUNDPLUS: 61 if (sign) { 62 Sgl_setlargestnegative(result); 63 } else { 64 Sgl_setinfinitypositive(result); 65 } 66 break; 67 case ROUNDMINUS: 68 if (sign==0) { 69 Sgl_setlargestpositive(result); 70 } else { 71 Sgl_setinfinitynegative(result); 72 } 73 break; 74 case ROUNDNEAREST: 75 Sgl_setinfinity(result,sign); 76 break; 77 default: 78 case ROUNDZERO: 79 Sgl_setlargest(result,sign); 80 break; 81 } 82 #endif 83 Sgl_setinfinity(result,sign); 84 return(result); 85 } 86 87 dbl_floating_point dbl_setoverflow(sign) 88 89 unsigned int sign; 90 { 91 dbl_floating_point result; 92 93 /* set result to infinity or largest number */ 94 /* ignore for now 95 switch (Rounding_mode()) { 96 case ROUNDPLUS: 97 if (sign) { 98 Dbl_setlargestnegative(result); 99 } 100 else { 101 Dbl_setinfinitypositive(result); 102 } 103 break; 104 case ROUNDMINUS: 105 if (sign==0) { 106 Dbl_setlargestpositive(result); 107 } 108 else { 109 Dbl_setinfinitynegative(result); 110 } 111 break; 112 case ROUNDNEAREST: 113 Dbl_setinfinity(result,sign); 114 break; 115 case ROUNDZERO: 116 Dbl_setlargest(result,sign); 117 } 118 */ 119 Dbl_setinfinity(result.wd0,result.wd1,sign); 120 return(result); 121 } 122