xref: /netbsd-src/sys/arch/hppa/spmath/setovfl.c (revision aaf4ece63a859a04e37cf3a7229b5fab0157cc06)
1 /*	$NetBSD: setovfl.c,v 1.4 2005/12/11 12:17:40 christos 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.4 2005/12/11 12:17:40 christos 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 	return(result);
120 }
121