1*86d7f5d3SJohn Marino /*- 2*86d7f5d3SJohn Marino * Copyright (c) 2002, 2003 David Schultz <das@FreeBSD.ORG> 3*86d7f5d3SJohn Marino * All rights reserved. 4*86d7f5d3SJohn Marino * 5*86d7f5d3SJohn Marino * Redistribution and use in source and binary forms, with or without 6*86d7f5d3SJohn Marino * modification, are permitted provided that the following conditions 7*86d7f5d3SJohn Marino * are met: 8*86d7f5d3SJohn Marino * 1. Redistributions of source code must retain the above copyright 9*86d7f5d3SJohn Marino * notice, this list of conditions and the following disclaimer. 10*86d7f5d3SJohn Marino * 2. Redistributions in binary form must reproduce the above copyright 11*86d7f5d3SJohn Marino * notice, this list of conditions and the following disclaimer in the 12*86d7f5d3SJohn Marino * documentation and/or other materials provided with the distribution. 13*86d7f5d3SJohn Marino * 14*86d7f5d3SJohn Marino * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15*86d7f5d3SJohn Marino * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16*86d7f5d3SJohn Marino * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17*86d7f5d3SJohn Marino * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18*86d7f5d3SJohn Marino * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19*86d7f5d3SJohn Marino * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20*86d7f5d3SJohn Marino * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21*86d7f5d3SJohn Marino * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22*86d7f5d3SJohn Marino * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23*86d7f5d3SJohn Marino * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24*86d7f5d3SJohn Marino * SUCH DAMAGE. 25*86d7f5d3SJohn Marino * 26*86d7f5d3SJohn Marino * $FreeBSD: src/lib/libc/amd64/_fpmath.h,v 1.7 2008/01/17 16:39:06 bde Exp $ 27*86d7f5d3SJohn Marino */ 28*86d7f5d3SJohn Marino 29*86d7f5d3SJohn Marino union IEEEl2bits { 30*86d7f5d3SJohn Marino long double e; 31*86d7f5d3SJohn Marino struct { 32*86d7f5d3SJohn Marino unsigned int manl :32; 33*86d7f5d3SJohn Marino unsigned int manh :32; 34*86d7f5d3SJohn Marino unsigned int exp :15; 35*86d7f5d3SJohn Marino unsigned int sign :1; 36*86d7f5d3SJohn Marino unsigned int junkl :16; 37*86d7f5d3SJohn Marino unsigned int junkh :32; 38*86d7f5d3SJohn Marino } bits; 39*86d7f5d3SJohn Marino struct { 40*86d7f5d3SJohn Marino unsigned long man :64; 41*86d7f5d3SJohn Marino unsigned int expsign :16; 42*86d7f5d3SJohn Marino unsigned long junk :48; 43*86d7f5d3SJohn Marino } xbits; 44*86d7f5d3SJohn Marino }; 45*86d7f5d3SJohn Marino 46*86d7f5d3SJohn Marino #define LDBL_NBIT 0x80000000 47*86d7f5d3SJohn Marino #define mask_nbit_l(u) ((u).bits.manh &= ~LDBL_NBIT) 48*86d7f5d3SJohn Marino 49*86d7f5d3SJohn Marino #define LDBL_MANH_SIZE 32 50*86d7f5d3SJohn Marino #define LDBL_MANL_SIZE 32 51*86d7f5d3SJohn Marino 52*86d7f5d3SJohn Marino #define LDBL_TO_ARRAY32(u, a) do { \ 53*86d7f5d3SJohn Marino (a)[0] = (uint32_t)(u).bits.manl; \ 54*86d7f5d3SJohn Marino (a)[1] = (uint32_t)(u).bits.manh; \ 55*86d7f5d3SJohn Marino } while (0) 56