Return to fpbits.h CVS log

Up to [local] / sys / arch / hppa / spmath

Annotation of sys/arch/hppa/spmath/fpbits.h, Revision 1.1.1.1

1.1       nbrk        1: /*     $OpenBSD: fpbits.h,v 1.6 2002/09/20 19:26:59 mickey Exp $       */
                      2: /*
                      3:   (c) Copyright 1986 HEWLETT-PACKARD COMPANY
                      4:   To anyone who acknowledges that this file is provided "AS IS"
                      5:   without any express or implied warranty:
                      6:       permission to use, copy, modify, and distribute this file
                      7:   for any purpose is hereby granted without fee, provided that
                      8:   the above copyright notice and this notice appears in all
                      9:   copies, and that the name of Hewlett-Packard Company not be
                     10:   used in advertising or publicity pertaining to distribution
                     11:   of the software without specific, written prior permission.
                     12:   Hewlett-Packard Company makes no representations about the
                     13:   suitability of this software for any purpose.
                     14: */
                     15: /* @(#)fpbits.h: Revision: 1.6.88.1 Date: 93/12/07 15:06:21 */
                     16:
                     17: /*
                     18:  *  These macros are designed to be portable to all machines that have
                     19:  *  a wordsize greater than or equal to 32 bits that support the portable
                     20:  *  C compiler and the standard C preprocessor.  Wordsize (default 32)
                     21:  *  and bitfield assignment (default left-to-right,  unlike VAX, PDP-11)
                     22:  *  should be predefined using the constants HOSTWDSZ and BITFRL and
                     23:  *  the C compiler "-D" flag (e.g., -DHOSTWDSZ=36 -DBITFLR for the DEC-20).
                     24:  *  Note that the macro arguments assume that the integer being referenced
                     25:  *  is a 32-bit integer (right-justified on the 20) and that bit 0 is the
                     26:  *  most significant bit.
                     27:  */
                     28:
                     29: #ifndef HOSTWDSZ
                     30: #define        HOSTWDSZ        32
                     31: #endif
                     32:
                     33:
                     34: /*###########################  Macros  ######################################*/
                     35:
                     36: /*-------------------------------------------------------------------------
                     37:  * NewDeclareBitField_Reference - Declare a structure similar to the simulator
                     38:  * function "DeclBitfR" except its use is restricted to occur within a larger
                     39:  * enclosing structure or union definition.  This declaration is an unnamed
                     40:  * structure with the argument, name, as the member name and the argument,
                     41:  * uname, as the element name.
                     42:  *----------------------------------------------------------------------- */
                     43: #define Bitfield_extract(start, length, object)                \
                     44:     ((object) >> (HOSTWDSZ - (start) - (length)) &     \
                     45:     ((unsigned)-1 >> (HOSTWDSZ - (length))))
                     46:
                     47: #define Bitfield_signed_extract(start, length, object) \
                     48:     ((int)((object) << start) >> (HOSTWDSZ - (length)))
                     49:
                     50: #define Bitfield_mask(start, len, object)              \
                     51:     ((object) & (((unsigned)-1 >> (HOSTWDSZ-len)) << (HOSTWDSZ-start-len)))
                     52:
                     53: #define Bitfield_deposit(value,start,len,object)  object = \
                     54:     ((object) & ~(((unsigned)-1 >> (HOSTWDSZ-(len))) << (HOSTWDSZ-(start)-(len)))) | \
                     55:     (((value) & ((unsigned)-1 >> (HOSTWDSZ-(len)))) << (HOSTWDSZ-(start)-(len)))