1 1.8 matt /* $NetBSD: vaxfp.h,v 1.8 2008/08/05 16:47:42 matt Exp $ */ 2 1.1 kleink 3 1.1 kleink /*- 4 1.1 kleink * Copyright (c) 2003 The NetBSD Foundation, Inc. 5 1.1 kleink * All rights reserved. 6 1.1 kleink * 7 1.1 kleink * This code is derived from software contributed to The NetBSD Foundation 8 1.1 kleink * by Klaus Klein. 9 1.1 kleink * 10 1.1 kleink * Redistribution and use in source and binary forms, with or without 11 1.1 kleink * modification, are permitted provided that the following conditions 12 1.1 kleink * are met: 13 1.1 kleink * 1. Redistributions of source code must retain the above copyright 14 1.1 kleink * notice, this list of conditions and the following disclaimer. 15 1.1 kleink * 2. Redistributions in binary form must reproduce the above copyright 16 1.1 kleink * notice, this list of conditions and the following disclaimer in the 17 1.1 kleink * documentation and/or other materials provided with the distribution. 18 1.1 kleink * 19 1.1 kleink * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 1.1 kleink * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 1.1 kleink * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 1.1 kleink * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 1.1 kleink * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 1.1 kleink * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 1.1 kleink * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 1.1 kleink * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 1.1 kleink * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 1.1 kleink * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 1.1 kleink * POSSIBILITY OF SUCH DAMAGE. 30 1.1 kleink */ 31 1.1 kleink 32 1.1 kleink /* 33 1.1 kleink * vaxfp.h defines the layout of VAX Floating-Point data types. 34 1.1 kleink * Only F_floating and D_floating types are defined here; 35 1.1 kleink * G_floating and H_floating are not supported by NetBSD. 36 1.1 kleink */ 37 1.4 kleink #ifndef _VAX_VAXFP_H_ 38 1.4 kleink #define _VAX_VAXFP_H_ 39 1.1 kleink 40 1.8 matt #include <sys/featuretest.h> 41 1.8 matt 42 1.8 matt #if defined(_NETBSD_SOURCE) || defined(_ISOC99_SOURCE) 43 1.8 matt 44 1.8 matt typedef int fenv_t; 45 1.8 matt typedef int fexcept_t; 46 1.8 matt 47 1.8 matt #define FE_UNDERFLOW 0x01 /* underflow exception */ 48 1.8 matt 49 1.8 matt #define FE_ALL_EXCEPT 0x01 50 1.8 matt 51 1.8 matt #if !defined(_ISOC99_SOURCE) 52 1.1 kleink 53 1.6 christos #define FFLT_EXPBITS 8 54 1.6 christos #define FFLT_FRACHBITS 7 55 1.6 christos #define FFLT_FRACLBITS 16 56 1.6 christos #define FFLT_FRACBITS (FFLT_FRACLBITS + FFLT_FRACHBITS) 57 1.1 kleink 58 1.1 kleink struct vax_f_floating { 59 1.6 christos unsigned int fflt_frach:FFLT_FRACHBITS; 60 1.6 christos unsigned int fflt_exp:FFLT_EXPBITS; 61 1.3 matt unsigned int fflt_sign:1; 62 1.6 christos unsigned int fflt_fracl:FFLT_FRACLBITS; 63 1.1 kleink }; 64 1.1 kleink 65 1.6 christos #define DFLT_EXPBITS 8 66 1.6 christos #define DFLT_FRACHBITS 7 67 1.6 christos #define DFLT_FRACMBITS 16 68 1.6 christos #define DFLT_FRACLBITS 32 69 1.6 christos #define DFLT_FRACBITS (DFLT_FRACLBITS + DFLT_FRACMBITS + DFLT_FRACHBITS) 70 1.6 christos 71 1.1 kleink struct vax_d_floating { 72 1.6 christos 73 1.6 christos unsigned int dflt_frach:DFLT_FRACHBITS; 74 1.6 christos unsigned int dflt_exp:DFLT_EXPBITS; 75 1.3 matt unsigned int dflt_sign:1; 76 1.6 christos unsigned int dflt_fracm:DFLT_FRACMBITS; 77 1.6 christos unsigned int dflt_fracl:DFLT_FRACLBITS; 78 1.1 kleink }; 79 1.1 kleink 80 1.1 kleink /* 81 1.1 kleink * Exponent biases. 82 1.1 kleink */ 83 1.1 kleink #define FFLT_EXP_BIAS 128 84 1.1 kleink #define DFLT_EXP_BIAS 128 85 1.1 kleink 86 1.1 kleink /* 87 1.1 kleink * Convenience data structures. 88 1.1 kleink */ 89 1.1 kleink union vax_ffloating_u { 90 1.1 kleink float ffltu_f; 91 1.1 kleink struct vax_f_floating ffltu_fflt; 92 1.1 kleink }; 93 1.1 kleink 94 1.1 kleink union vax_dfloating_u { 95 1.1 kleink double dfltu_d; 96 1.1 kleink struct vax_d_floating dfltu_dflt; 97 1.3 matt }; 98 1.3 matt 99 1.8 matt #endif /* !_ISOC99_SOURCE */ 100 1.8 matt 101 1.8 matt #endif /* _NETBSD_SOURCE || _ISOC99_SOURCE */ 102 1.8 matt 103 1.4 kleink #endif /* _VAX_VAXFP_H_ */ 104