⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 x-cvsweb-markup(51)

📁 软件浮点数计算功能
💻
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><HTML><HEAD><!-- hennerik CVSweb $Revision: 1.93 $ --><TITLE>glibc.dead/soft-fp/quad.h - view - 1.1.1.2</TITLE></HEAD><BODY BGCOLOR="#eeeeee"><table width="100%" border=0 cellspacing=0 cellpadding=1 bgcolor="#9999ee"><tr valign=bottom><td><a href="quad.h#rev1.1.1.2"><IMG SRC="/icons/back.gif" ALT="[BACK]" BORDER="0" WIDTH="20" HEIGHT="22"></a> <b>Return to <A HREF="quad.h#rev1.1.1.2">quad.h</A> CVS log</b> <IMG SRC="/icons/text.gif" ALT="[TXT]" BORDER="0" WIDTH="20" HEIGHT="22"></td><td align=right><IMG SRC="/icons/dir.gif" ALT="[DIR]" BORDER="0" WIDTH="20" HEIGHT="22"> <b>Up to  <a href="/cgi-bin/cvsweb.cgi/#dirlist">[Development]</a> / <a href="/cgi-bin/cvsweb.cgi/glibc.dead/#dirlist">glibc.dead</a> / <a href="/cgi-bin/cvsweb.cgi/glibc.dead/soft-fp/#dirlist">soft-fp</a></b></td></tr></table><HR noshade><table width="100%"><tr><td bgcolor="#ffffff">File:  <a href="/cgi-bin/cvsweb.cgi/#dirlist">[Development]</a> / <a href="/cgi-bin/cvsweb.cgi/glibc.dead/#dirlist">glibc.dead</a> / <a href="/cgi-bin/cvsweb.cgi/glibc.dead/soft-fp/#dirlist">soft-fp</a> / <a href="/cgi-bin/cvsweb.cgi/glibc.dead/soft-fp/quad.h">quad.h</a>&nbsp;(<A HREF="/cgi-bin/cvsweb.cgi/~checkout~/glibc.dead/soft-fp/quad.h?rev=1.1.1.2" target="cvs_checkout" onClick="window.open('/cgi-bin/cvsweb.cgi/~checkout~/glibc.dead/soft-fp/quad.h?rev=1.1.1.2','cvs_checkout','resizeable,scrollbars');"><b>download</b></A>)<BR>Revision <B>1.1.1.2</B> <i>(vendor branch)</i>, <i>Thu Aug  2 11:38:45 2001 UTC</i> (3 years, 4 months ago) by <i>aj</i><BR>Branch: <b>glibc-2001-09-13, MAIN</b><BR>CVS Tags: <b>glibc-pre-merge-2001-09-13, glibc-2001-08-02, HEAD, GLIBC_MAIN</b><BR>Changes since <b>1.1.1.1: +8 -8 lines</b><PRE>Import from main glibc repository at 2001-08-02.</PRE></td></tr></table><HR noshade><PRE>/* Software floating-point emulation. &nbsp; Definitions for IEEE Quad Precision. &nbsp; Copyright (C) 1997,1998,1999 Free Software Foundation, Inc. &nbsp; This file is part of the GNU C Library. &nbsp; Contributed by Richard Henderson (<A HREF="mailto:rth@cygnus.com">rth@cygnus.com</A>), &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Jakub Jelinek (<A HREF="mailto:jj@ultra.linux.cz">jj@ultra.linux.cz</A>), &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;David S. Miller (<A HREF="mailto:davem@redhat.com">davem@redhat.com</A>) and &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Peter Maydell (<A HREF="mailto:pmaydell@chiark.greenend.org.uk">pmaydell@chiark.greenend.org.uk</A>). &nbsp; The GNU C Library is free software; you can redistribute it and/or &nbsp; modify it under the terms of the GNU Lesser General Public &nbsp; License as published by the Free Software Foundation; either &nbsp; version 2.1 of the License, or (at your option) any later version. &nbsp; The GNU C Library is distributed in the hope that it will be useful, &nbsp; but WITHOUT ANY WARRANTY; without even the implied warranty of &nbsp; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. &nbsp;See the GNU &nbsp; Lesser General Public License for more details. &nbsp; You should have received a copy of the GNU Lesser General Public &nbsp; License along with the GNU C Library; if not, write to the Free &nbsp; Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA &nbsp; 02111-1307 USA. &nbsp;*/#if _FP_W_TYPE_SIZE &lt; 32#error &quot;Here's a nickel, kid. Go buy yourself a real computer.&quot;#endif#if _FP_W_TYPE_SIZE &lt; 64#define _FP_FRACTBITS_Q &nbsp; &nbsp; &nbsp; &nbsp; (4*_FP_W_TYPE_SIZE)#else#define _FP_FRACTBITS_Q &nbsp; &nbsp; &nbsp; &nbsp; (2*_FP_W_TYPE_SIZE)#endif#define _FP_FRACBITS_Q &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;113#define _FP_FRACXBITS_Q &nbsp; &nbsp; &nbsp; &nbsp; (_FP_FRACTBITS_Q - _FP_FRACBITS_Q)#define _FP_WFRACBITS_Q &nbsp; &nbsp; &nbsp; &nbsp; (_FP_WORKBITS + _FP_FRACBITS_Q)#define _FP_WFRACXBITS_Q &nbsp; &nbsp; &nbsp; &nbsp;(_FP_FRACTBITS_Q - _FP_WFRACBITS_Q)#define _FP_EXPBITS_Q &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 15#define _FP_EXPBIAS_Q &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 16383#define _FP_EXPMAX_Q &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;32767#define _FP_QNANBIT_Q &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; \ &nbsp; &nbsp; &nbsp; &nbsp;((_FP_W_TYPE)1 &lt;&lt; (_FP_FRACBITS_Q-2) % _FP_W_TYPE_SIZE)#define _FP_IMPLBIT_Q &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; \ &nbsp; &nbsp; &nbsp; &nbsp;((_FP_W_TYPE)1 &lt;&lt; (_FP_FRACBITS_Q-1) % _FP_W_TYPE_SIZE)#define _FP_OVERFLOW_Q &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp; &nbsp; &nbsp;((_FP_W_TYPE)1 &lt;&lt; (_FP_WFRACBITS_Q % _FP_W_TYPE_SIZE))#if _FP_W_TYPE_SIZE &lt; 64union _FP_UNION_Q{ &nbsp; long double flt; &nbsp; struct  &nbsp; {#if __BYTE_ORDER == __BIG_ENDIAN &nbsp; &nbsp; &nbsp;unsigned sign : 1; &nbsp; &nbsp; &nbsp;unsigned exp : _FP_EXPBITS_Q; &nbsp; &nbsp; &nbsp;unsigned long frac3 : _FP_FRACBITS_Q - (_FP_IMPLBIT_Q != 0)-(_FP_W_TYPE_SIZE * 3); &nbsp; &nbsp; &nbsp;unsigned long frac2 : _FP_W_TYPE_SIZE; &nbsp; &nbsp; &nbsp;unsigned long frac1 : _FP_W_TYPE_SIZE; &nbsp; &nbsp; &nbsp;unsigned long frac0 : _FP_W_TYPE_SIZE;#else &nbsp; &nbsp; &nbsp;unsigned long frac0 : _FP_W_TYPE_SIZE; &nbsp; &nbsp; &nbsp;unsigned long frac1 : _FP_W_TYPE_SIZE; &nbsp; &nbsp; &nbsp;unsigned long frac2 : _FP_W_TYPE_SIZE; &nbsp; &nbsp; &nbsp;unsigned long frac3 : _FP_FRACBITS_Q - (_FP_IMPLBIT_Q != 0)-(_FP_W_TYPE_SIZE * 3); &nbsp; &nbsp; &nbsp;unsigned exp : _FP_EXPBITS_Q; &nbsp; &nbsp; &nbsp;unsigned sign : 1;#endif /* not bigendian */ &nbsp; } bits __attribute__((packed));};#define FP_DECL_Q(X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;_FP_DECL(4,X)#define FP_UNPACK_RAW_Q(X,val) &nbsp;_FP_UNPACK_RAW_4(Q,X,val)#define FP_UNPACK_RAW_QP(X,val) _FP_UNPACK_RAW_4_P(Q,X,val)#define FP_PACK_RAW_Q(val,X) &nbsp; &nbsp;_FP_PACK_RAW_4(Q,val,X)#define FP_PACK_RAW_QP(val,X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; \ &nbsp;do { &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;if (!FP_INHIBIT_RESULTS) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp; &nbsp;_FP_PACK_RAW_4_P(Q,val,X); &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;} while (0)#define FP_UNPACK_Q(X,val) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;do { &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_UNPACK_RAW_4(Q,X,val); &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_UNPACK_CANONICAL(Q,4,X); &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;} while (0)#define FP_UNPACK_QP(X,val) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; \ &nbsp;do { &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_UNPACK_RAW_4_P(Q,X,val); &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_UNPACK_CANONICAL(Q,4,X); &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;} while (0)#define FP_PACK_Q(val,X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;do { &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_PACK_CANONICAL(Q,4,X); &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_PACK_RAW_4(Q,val,X); &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;} while (0)#define FP_PACK_QP(val,X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; \ &nbsp;do { &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_PACK_CANONICAL(Q,4,X); &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;if (!FP_INHIBIT_RESULTS) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp; &nbsp;_FP_PACK_RAW_4_P(Q,val,X); &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;} while (0)#define FP_ISSIGNAN_Q(X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;_FP_ISSIGNAN(Q,4,X)#define FP_NEG_Q(R,X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _FP_NEG(Q,4,R,X)#define FP_ADD_Q(R,X,Y) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _FP_ADD(Q,4,R,X,Y)#define FP_SUB_Q(R,X,Y) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _FP_SUB(Q,4,R,X,Y)#define FP_MUL_Q(R,X,Y) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _FP_MUL(Q,4,R,X,Y)#define FP_DIV_Q(R,X,Y) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _FP_DIV(Q,4,R,X,Y)#define FP_SQRT_Q(R,X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;_FP_SQRT(Q,4,R,X)#define _FP_SQRT_MEAT_Q(R,S,T,X,Q) &nbsp; &nbsp; &nbsp;_FP_SQRT_MEAT_4(R,S,T,X,Q)#define FP_CMP_Q(r,X,Y,un) &nbsp; &nbsp; &nbsp;_FP_CMP(Q,4,r,X,Y,un)#define FP_CMP_EQ_Q(r,X,Y) &nbsp; &nbsp; &nbsp;_FP_CMP_EQ(Q,4,r,X,Y)#define FP_TO_INT_Q(r,X,rsz,rsg) &nbsp; &nbsp; &nbsp; &nbsp;_FP_TO_INT(Q,4,r,X,rsz,rsg)#define FP_FROM_INT_Q(X,r,rs,rt) &nbsp; &nbsp; &nbsp; &nbsp;_FP_FROM_INT(Q,4,X,r,rs,rt)#define _FP_FRAC_HIGH_Q(X) &nbsp; &nbsp; &nbsp;_FP_FRAC_HIGH_4(X)#define _FP_FRAC_HIGH_RAW_Q(X) &nbsp;_FP_FRAC_HIGH_4(X)#else &nbsp; /* not _FP_W_TYPE_SIZE &lt; 64 */union _FP_UNION_Q{ &nbsp;long double flt /* __attribute__((mode(TF))) */ ; &nbsp;struct {#if __BYTE_ORDER == __BIG_ENDIAN &nbsp; &nbsp;unsigned sign &nbsp;: 1; &nbsp; &nbsp;unsigned exp &nbsp; : _FP_EXPBITS_Q; &nbsp; &nbsp;unsigned long frac1 : _FP_FRACBITS_Q-(_FP_IMPLBIT_Q != 0)-_FP_W_TYPE_SIZE; &nbsp; &nbsp;unsigned long frac0 : _FP_W_TYPE_SIZE;#else &nbsp; &nbsp;unsigned long frac0 : _FP_W_TYPE_SIZE; &nbsp; &nbsp;unsigned long frac1 : _FP_FRACBITS_Q-(_FP_IMPLBIT_Q != 0)-_FP_W_TYPE_SIZE; &nbsp; &nbsp;unsigned exp &nbsp; : _FP_EXPBITS_Q; &nbsp; &nbsp;unsigned sign &nbsp;: 1;#endif &nbsp;} bits;};#define FP_DECL_Q(X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;_FP_DECL(2,X)#define FP_UNPACK_RAW_Q(X,val) &nbsp;_FP_UNPACK_RAW_2(Q,X,val)#define FP_UNPACK_RAW_QP(X,val) _FP_UNPACK_RAW_2_P(Q,X,val)#define FP_PACK_RAW_Q(val,X) &nbsp; &nbsp;_FP_PACK_RAW_2(Q,val,X)#define FP_PACK_RAW_QP(val,X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; \ &nbsp;do { &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;if (!FP_INHIBIT_RESULTS) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp; &nbsp;_FP_PACK_RAW_2_P(Q,val,X); &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;} while (0)#define FP_UNPACK_Q(X,val) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;do { &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_UNPACK_RAW_2(Q,X,val); &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_UNPACK_CANONICAL(Q,2,X); &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;} while (0)#define FP_UNPACK_QP(X,val) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; \ &nbsp;do { &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_UNPACK_RAW_2_P(Q,X,val); &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_UNPACK_CANONICAL(Q,2,X); &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;} while (0)#define FP_PACK_Q(val,X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;do { &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_PACK_CANONICAL(Q,2,X); &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_PACK_RAW_2(Q,val,X); &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;} while (0)#define FP_PACK_QP(val,X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; \ &nbsp;do { &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;_FP_PACK_CANONICAL(Q,2,X); &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp;if (!FP_INHIBIT_RESULTS) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp; &nbsp; &nbsp;_FP_PACK_RAW_2_P(Q,val,X); &nbsp; &nbsp; &nbsp; &nbsp;\ &nbsp;} while (0)#define FP_ISSIGNAN_Q(X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;_FP_ISSIGNAN(Q,2,X)#define FP_NEG_Q(R,X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _FP_NEG(Q,2,R,X)#define FP_ADD_Q(R,X,Y) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _FP_ADD(Q,2,R,X,Y)#define FP_SUB_Q(R,X,Y) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _FP_SUB(Q,2,R,X,Y)#define FP_MUL_Q(R,X,Y) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _FP_MUL(Q,2,R,X,Y)#define FP_DIV_Q(R,X,Y) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _FP_DIV(Q,2,R,X,Y)#define FP_SQRT_Q(R,X) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;_FP_SQRT(Q,2,R,X)#define _FP_SQRT_MEAT_Q(R,S,T,X,Q) &nbsp; &nbsp; &nbsp;_FP_SQRT_MEAT_2(R,S,T,X,Q)#define FP_CMP_Q(r,X,Y,un) &nbsp; &nbsp; &nbsp;_FP_CMP(Q,2,r,X,Y,un)#define FP_CMP_EQ_Q(r,X,Y) &nbsp; &nbsp; &nbsp;_FP_CMP_EQ(Q,2,r,X,Y)#define FP_TO_INT_Q(r,X,rsz,rsg) &nbsp; &nbsp; &nbsp; &nbsp;_FP_TO_INT(Q,2,r,X,rsz,rsg)#define FP_FROM_INT_Q(X,r,rs,rt) &nbsp; &nbsp; &nbsp; &nbsp;_FP_FROM_INT(Q,2,X,r,rs,rt)#define _FP_FRAC_HIGH_Q(X) &nbsp; &nbsp; &nbsp;_FP_FRAC_HIGH_2(X)#define _FP_FRAC_HIGH_RAW_Q(X) &nbsp;_FP_FRAC_HIGH_2(X)#endif /* not _FP_W_TYPE_SIZE &lt; 64 */</PRE>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -