summaryrefslogtreecommitdiff
path: root/lang/newsqueak/patches/patch-lib9_nan.c
blob: 591981c90a42d6f592a9c3bfbc53a736859a06d3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
$NetBSD: patch-lib9_nan.c,v 1.1 2015/04/25 19:58:32 dholland Exp $

"long" isn't necessarily 32 bits wide.

--- lib9/nan.c~	2000-02-11 17:04:14.000000000 +0000
+++ lib9/nan.c
@@ -16,7 +16,7 @@ NaN(void)
 	union
 	{
 		double	d;
-		long	x[2];
+		uint32_t	x[2];
 	} a;
 
 	a.x[1] = NANEXP;
@@ -30,7 +30,7 @@ isNaN(double d)
 	union
 	{
 		double	d;
-		long	x[2];
+		uint32_t	x[2];
 	} a;
 
 	a.d = d;
@@ -45,7 +45,7 @@ Inf(int sign)
 	union
 	{
 		double	d;
-		long	x[2];
+		uint32_t	x[2];
 	} a;
 
 	a.x[1] = NANEXP;
@@ -61,7 +61,7 @@ isInf(double d, int sign)
 	union
 	{
 		double	d;
-		long	x[2];
+		uint32_t	x[2];
 	} a;
 
 	a.d = d;