]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * Copyright (c) 2003, 2008 Apple Inc. All rights reserved. | |
3 | * | |
4 | * @APPLE_LICENSE_HEADER_START@ | |
5 | * | |
6 | * This file contains Original Code and/or Modifications of Original Code | |
7 | * as defined in and that are subject to the Apple Public Source License | |
8 | * Version 2.0 (the 'License'). You may not use this file except in | |
9 | * compliance with the License. Please obtain a copy of the License at | |
10 | * http://www.opensource.apple.com/apsl/ and read it before using this | |
11 | * file. | |
12 | * | |
13 | * The Original Code and all software distributed under the License are | |
14 | * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER | |
15 | * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES, | |
16 | * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY, | |
17 | * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT. | |
18 | * Please see the License for the specific language governing rights and | |
19 | * limitations under the License. | |
20 | * | |
21 | * @APPLE_LICENSE_HEADER_END@ | |
22 | */ | |
23 | /*- | |
24 | * Copyright (c) 2002, 2003 David Schultz <dschultz@uclink.Berkeley.EDU> | |
25 | * All rights reserved. | |
26 | * | |
27 | * Redistribution and use in source and binary forms, with or without | |
28 | * modification, are permitted provided that the following conditions | |
29 | * are met: | |
30 | * 1. Redistributions of source code must retain the above copyright | |
31 | * notice, this list of conditions and the following disclaimer. | |
32 | * 2. Redistributions in binary form must reproduce the above copyright | |
33 | * notice, this list of conditions and the following disclaimer in the | |
34 | * documentation and/or other materials provided with the distribution. | |
35 | * | |
36 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND | |
37 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
38 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | |
39 | * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE | |
40 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | |
41 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | |
42 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
43 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | |
44 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | |
45 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | |
46 | * SUCH DAMAGE. | |
47 | * | |
48 | * $FreeBSD: src/lib/libc/i386/_fpmath.h,v 1.3 2004/01/18 07:57:01 das Exp $ | |
49 | */ | |
50 | ||
51 | #if defined(__ppc__) || defined(__ppc64__) | |
52 | ||
53 | union IEEEl2bits { | |
54 | long double e; | |
55 | double d[2]; | |
56 | struct { | |
57 | unsigned long long sign :1; | |
58 | unsigned long long exp :11; | |
59 | unsigned long long manh :52; | |
60 | unsigned long long sign2 :1; | |
61 | unsigned long long exp2 :11; | |
62 | unsigned long long manl :52; | |
63 | } bits; | |
64 | }; | |
65 | ||
66 | #define mask_nbit_l(u) ((void)0) | |
67 | #define LDBL_IMPLICIT_NBIT | |
68 | ||
69 | #define LDBL_MANH_SIZE 52 | |
70 | #define LDBL_MANL_SIZE 53 // includes hidden bit | |
71 | ||
72 | #define LDBL_HEAD_TAIL_PAIR | |
73 | ||
74 | __private_extern__ int _ldbl2array32dd(union IEEEl2bits, uint32_t *); | |
75 | ||
76 | #define LDBL_TO_ARRAY32(u, a) _ldbl2array32dd(u, a) | |
77 | ||
78 | #elif defined(__i386__) || defined(__x86_64__) | |
79 | ||
80 | union IEEEl2bits { | |
81 | long double e; | |
82 | struct { | |
83 | unsigned int manl :32; | |
84 | unsigned int manh :32; | |
85 | unsigned int exp :15; | |
86 | unsigned int sign :1; | |
87 | unsigned int junk :16; | |
88 | } bits; | |
89 | }; | |
90 | ||
91 | #define mask_nbit_l(u) ((u).bits.manh &= 0x7fffffff) | |
92 | ||
93 | #define LDBL_MANH_SIZE 32 | |
94 | #define LDBL_MANL_SIZE 32 | |
95 | ||
96 | #define LDBL_TO_ARRAY32(u, a) do { \ | |
97 | (a)[0] = (uint32_t)(u).bits.manl; \ | |
98 | (a)[1] = (uint32_t)(u).bits.manh; \ | |
99 | } while(0) | |
100 | #elif defined(__arm__) | |
101 | ||
102 | union IEEEl2bits { | |
103 | long double e; | |
104 | struct { | |
105 | #ifndef __ARMEB__ | |
106 | unsigned int manl :32; | |
107 | unsigned int manh :20; | |
108 | unsigned int exp :11; | |
109 | unsigned int sign :1; | |
110 | #else | |
111 | unsigned int sign :1; | |
112 | unsigned int exp :11; | |
113 | unsigned int manh :20; | |
114 | unsigned int manl :32; | |
115 | #endif | |
116 | } bits; | |
117 | }; | |
118 | ||
119 | #define LDBL_NBIT 0 | |
120 | #define mask_nbit_l(u) ((void)0) | |
121 | ||
122 | #define LDBL_MANH_SIZE 20 | |
123 | #define LDBL_MANL_SIZE 32 | |
124 | ||
125 | #define LDBL_TO_ARRAY32(u, a) do { \ | |
126 | (a)[0] = (uint32_t)(u).bits.manl; \ | |
127 | (a)[1] = (uint32_t)(u).bits.manh; \ | |
128 | } while(0) | |
129 | ||
130 | #else | |
131 | #error unsupported architecture | |
132 | #endif |