Home | History | Annotate | Line # | Download | only in spmath
hppa.h revision 1.1.4.2 
      1  1.1.4.2  gehenna /*	$NetBSD: hppa.h,v 1.1.4.2 2002/07/14 17:47:45 gehenna Exp $	*/
      2  1.1.4.2  gehenna 
      3  1.1.4.2  gehenna /*	$OpenBSD: hppa.h,v 1.4 2001/03/29 03:58:18 mickey Exp $	*/
      4  1.1.4.2  gehenna 
      5  1.1.4.2  gehenna /*
      6  1.1.4.2  gehenna  * Copyright 1996 1995 by Open Software Foundation, Inc.
      7  1.1.4.2  gehenna  *              All Rights Reserved
      8  1.1.4.2  gehenna  *
      9  1.1.4.2  gehenna  * Permission to use, copy, modify, and distribute this software and
     10  1.1.4.2  gehenna  * its documentation for any purpose and without fee is hereby granted,
     11  1.1.4.2  gehenna  * provided that the above copyright notice appears in all copies and
     12  1.1.4.2  gehenna  * that both the copyright notice and this permission notice appear in
     13  1.1.4.2  gehenna  * supporting documentation.
     14  1.1.4.2  gehenna  *
     15  1.1.4.2  gehenna  * OSF DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE
     16  1.1.4.2  gehenna  * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
     17  1.1.4.2  gehenna  * FOR A PARTICULAR PURPOSE.
     18  1.1.4.2  gehenna  *
     19  1.1.4.2  gehenna  * IN NO EVENT SHALL OSF BE LIABLE FOR ANY SPECIAL, INDIRECT, OR
     20  1.1.4.2  gehenna  * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
     21  1.1.4.2  gehenna  * LOSS OF USE, DATA OR PROFITS, WHETHER IN ACTION OF CONTRACT,
     22  1.1.4.2  gehenna  * NEGLIGENCE, OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
     23  1.1.4.2  gehenna  * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
     24  1.1.4.2  gehenna  */
     25  1.1.4.2  gehenna /*
     26  1.1.4.2  gehenna  * pmk1.1
     27  1.1.4.2  gehenna  */
     28  1.1.4.2  gehenna /*
     29  1.1.4.2  gehenna  * (c) Copyright 1986 HEWLETT-PACKARD COMPANY
     30  1.1.4.2  gehenna  *
     31  1.1.4.2  gehenna  * To anyone who acknowledges that this file is provided "AS IS"
     32  1.1.4.2  gehenna  * without any express or implied warranty:
     33  1.1.4.2  gehenna  *     permission to use, copy, modify, and distribute this file
     34  1.1.4.2  gehenna  * for any purpose is hereby granted without fee, provided that
     35  1.1.4.2  gehenna  * the above copyright notice and this notice appears in all
     36  1.1.4.2  gehenna  * copies, and that the name of Hewlett-Packard Company not be
     37  1.1.4.2  gehenna  * used in advertising or publicity pertaining to distribution
     38  1.1.4.2  gehenna  * of the software without specific, written prior permission.
     39  1.1.4.2  gehenna  * Hewlett-Packard Company makes no representations about the
     40  1.1.4.2  gehenna  * suitability of this software for any purpose.
     41  1.1.4.2  gehenna  */
     42  1.1.4.2  gehenna 
     43  1.1.4.2  gehenna /* amount is assumed to be a constant between 0 and 32 (non-inclusive) */
     44  1.1.4.2  gehenna #define Shiftdouble(left,right,amount,dest)			\
     45  1.1.4.2  gehenna     /* int left, right, amount, dest; */			\
     46  1.1.4.2  gehenna     dest = ((left) << (32-(amount))) | ((unsigned int)(right) >> (amount))
     47  1.1.4.2  gehenna 
     48  1.1.4.2  gehenna /* amount must be less than 32 */
     49  1.1.4.2  gehenna #define Variableshiftdouble(left,right,amount,dest)		\
     50  1.1.4.2  gehenna     /* unsigned int left, right;  int amount, dest; */		\
     51  1.1.4.2  gehenna     if (amount == 0) dest = right;				\
     52  1.1.4.2  gehenna     else dest = ((((unsigned) left)&0x7fffffff) << (32-(amount))) |	\
     53  1.1.4.2  gehenna 	((unsigned) right >> (amount))
     54  1.1.4.2  gehenna 
     55  1.1.4.2  gehenna /* amount must be between 0 and 32 (non-inclusive) */
     56  1.1.4.2  gehenna #define Variable_shift_double(left,right,amount,dest)		\
     57  1.1.4.2  gehenna     /* unsigned int left, right;  int amount, dest; */		\
     58  1.1.4.2  gehenna     dest = (left << (32-(amount))) | ((unsigned) right >> (amount))
     59