^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 1) /* Software floating-point emulation.
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 2) Definitions for IEEE Quad Precision.
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 3) Copyright (C) 1997,1998,1999 Free Software Foundation, Inc.
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 4) This file is part of the GNU C Library.
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 5) Contributed by Richard Henderson (rth@cygnus.com),
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 6) Jakub Jelinek (jj@ultra.linux.cz),
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 7) David S. Miller (davem@redhat.com) and
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 8) Peter Maydell (pmaydell@chiark.greenend.org.uk).
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 9)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 10) The GNU C Library is free software; you can redistribute it and/or
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 11) modify it under the terms of the GNU Library General Public License as
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 12) published by the Free Software Foundation; either version 2 of the
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 13) License, or (at your option) any later version.
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 14)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 15) The GNU C Library is distributed in the hope that it will be useful,
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 16) but WITHOUT ANY WARRANTY; without even the implied warranty of
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 17) MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 18) Library General Public License for more details.
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 19)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 20) You should have received a copy of the GNU Library General Public
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 21) License along with the GNU C Library; see the file COPYING.LIB. If
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 22) not, write to the Free Software Foundation, Inc.,
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 23) 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 24)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 25) #ifndef __MATH_EMU_QUAD_H__
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 26) #define __MATH_EMU_QUAD_H__
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 27)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 28) #if _FP_W_TYPE_SIZE < 32
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 29) #error "Here's a nickel, kid. Go buy yourself a real computer."
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 30) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 31)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 32) #if _FP_W_TYPE_SIZE < 64
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 33) #define _FP_FRACTBITS_Q (4*_FP_W_TYPE_SIZE)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 34) #else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 35) #define _FP_FRACTBITS_Q (2*_FP_W_TYPE_SIZE)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 36) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 37)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 38) #define _FP_FRACBITS_Q 113
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 39) #define _FP_FRACXBITS_Q (_FP_FRACTBITS_Q - _FP_FRACBITS_Q)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 40) #define _FP_WFRACBITS_Q (_FP_WORKBITS + _FP_FRACBITS_Q)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 41) #define _FP_WFRACXBITS_Q (_FP_FRACTBITS_Q - _FP_WFRACBITS_Q)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 42) #define _FP_EXPBITS_Q 15
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 43) #define _FP_EXPBIAS_Q 16383
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 44) #define _FP_EXPMAX_Q 32767
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 45)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 46) #define _FP_QNANBIT_Q \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 47) ((_FP_W_TYPE)1 << (_FP_FRACBITS_Q-2) % _FP_W_TYPE_SIZE)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 48) #define _FP_IMPLBIT_Q \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 49) ((_FP_W_TYPE)1 << (_FP_FRACBITS_Q-1) % _FP_W_TYPE_SIZE)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 50) #define _FP_OVERFLOW_Q \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 51) ((_FP_W_TYPE)1 << (_FP_WFRACBITS_Q % _FP_W_TYPE_SIZE))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 52)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 53) #if _FP_W_TYPE_SIZE < 64
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 54)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 55) union _FP_UNION_Q
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 56) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 57) long double flt;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 58) struct
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 59) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 60) #if __BYTE_ORDER == __BIG_ENDIAN
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 61) unsigned sign : 1;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 62) unsigned exp : _FP_EXPBITS_Q;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 63) unsigned long frac3 : _FP_FRACBITS_Q - (_FP_IMPLBIT_Q != 0)-(_FP_W_TYPE_SIZE * 3);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 64) unsigned long frac2 : _FP_W_TYPE_SIZE;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 65) unsigned long frac1 : _FP_W_TYPE_SIZE;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 66) unsigned long frac0 : _FP_W_TYPE_SIZE;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 67) #else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 68) unsigned long frac0 : _FP_W_TYPE_SIZE;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 69) unsigned long frac1 : _FP_W_TYPE_SIZE;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 70) unsigned long frac2 : _FP_W_TYPE_SIZE;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 71) unsigned long frac3 : _FP_FRACBITS_Q - (_FP_IMPLBIT_Q != 0)-(_FP_W_TYPE_SIZE * 3);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 72) unsigned exp : _FP_EXPBITS_Q;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 73) unsigned sign : 1;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 74) #endif /* not bigendian */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 75) } bits __attribute__((packed));
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 76) };
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 77)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 78)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 79) #define FP_DECL_Q(X) _FP_DECL(4,X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 80) #define FP_UNPACK_RAW_Q(X,val) _FP_UNPACK_RAW_4(Q,X,val)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 81) #define FP_UNPACK_RAW_QP(X,val) _FP_UNPACK_RAW_4_P(Q,X,val)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 82) #define FP_PACK_RAW_Q(val,X) _FP_PACK_RAW_4(Q,val,X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 83) #define FP_PACK_RAW_QP(val,X) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 84) do { \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 85) if (!FP_INHIBIT_RESULTS) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 86) _FP_PACK_RAW_4_P(Q,val,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 87) } while (0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 88)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 89) #define FP_UNPACK_Q(X,val) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 90) do { \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 91) _FP_UNPACK_RAW_4(Q,X,val); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 92) _FP_UNPACK_CANONICAL(Q,4,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 93) } while (0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 94)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 95) #define FP_UNPACK_QP(X,val) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 96) do { \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 97) _FP_UNPACK_RAW_4_P(Q,X,val); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 98) _FP_UNPACK_CANONICAL(Q,4,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 99) } while (0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 100)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 101) #define FP_PACK_Q(val,X) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 102) do { \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 103) _FP_PACK_CANONICAL(Q,4,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 104) _FP_PACK_RAW_4(Q,val,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 105) } while (0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 106)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 107) #define FP_PACK_QP(val,X) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 108) do { \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 109) _FP_PACK_CANONICAL(Q,4,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 110) if (!FP_INHIBIT_RESULTS) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 111) _FP_PACK_RAW_4_P(Q,val,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 112) } while (0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 113)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 114) #define FP_ISSIGNAN_Q(X) _FP_ISSIGNAN(Q,4,X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 115) #define FP_NEG_Q(R,X) _FP_NEG(Q,4,R,X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 116) #define FP_ADD_Q(R,X,Y) _FP_ADD(Q,4,R,X,Y)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 117) #define FP_SUB_Q(R,X,Y) _FP_SUB(Q,4,R,X,Y)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 118) #define FP_MUL_Q(R,X,Y) _FP_MUL(Q,4,R,X,Y)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 119) #define FP_DIV_Q(R,X,Y) _FP_DIV(Q,4,R,X,Y)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 120) #define FP_SQRT_Q(R,X) _FP_SQRT(Q,4,R,X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 121) #define _FP_SQRT_MEAT_Q(R,S,T,X,Q) _FP_SQRT_MEAT_4(R,S,T,X,Q)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 122)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 123) #define FP_CMP_Q(r,X,Y,un) _FP_CMP(Q,4,r,X,Y,un)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 124) #define FP_CMP_EQ_Q(r,X,Y) _FP_CMP_EQ(Q,4,r,X,Y)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 125)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 126) #define FP_TO_INT_Q(r,X,rsz,rsg) _FP_TO_INT(Q,4,r,X,rsz,rsg)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 127) #define FP_TO_INT_ROUND_Q(r,X,rsz,rsg) _FP_TO_INT_ROUND(Q,4,r,X,rsz,rsg)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 128) #define FP_FROM_INT_Q(X,r,rs,rt) _FP_FROM_INT(Q,4,X,r,rs,rt)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 129)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 130) #define _FP_FRAC_HIGH_Q(X) _FP_FRAC_HIGH_4(X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 131) #define _FP_FRAC_HIGH_RAW_Q(X) _FP_FRAC_HIGH_4(X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 132)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 133) #else /* not _FP_W_TYPE_SIZE < 64 */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 134) union _FP_UNION_Q
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 135) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 136) long double flt /* __attribute__((mode(TF))) */ ;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 137) struct {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 138) #if __BYTE_ORDER == __BIG_ENDIAN
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 139) unsigned sign : 1;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 140) unsigned exp : _FP_EXPBITS_Q;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 141) unsigned long frac1 : _FP_FRACBITS_Q-(_FP_IMPLBIT_Q != 0)-_FP_W_TYPE_SIZE;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 142) unsigned long frac0 : _FP_W_TYPE_SIZE;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 143) #else
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 144) unsigned long frac0 : _FP_W_TYPE_SIZE;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 145) unsigned long frac1 : _FP_FRACBITS_Q-(_FP_IMPLBIT_Q != 0)-_FP_W_TYPE_SIZE;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 146) unsigned exp : _FP_EXPBITS_Q;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 147) unsigned sign : 1;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 148) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 149) } bits;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 150) };
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 151)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 152) #define FP_DECL_Q(X) _FP_DECL(2,X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 153) #define FP_UNPACK_RAW_Q(X,val) _FP_UNPACK_RAW_2(Q,X,val)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 154) #define FP_UNPACK_RAW_QP(X,val) _FP_UNPACK_RAW_2_P(Q,X,val)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 155) #define FP_PACK_RAW_Q(val,X) _FP_PACK_RAW_2(Q,val,X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 156) #define FP_PACK_RAW_QP(val,X) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 157) do { \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 158) if (!FP_INHIBIT_RESULTS) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 159) _FP_PACK_RAW_2_P(Q,val,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 160) } while (0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 161)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 162) #define FP_UNPACK_Q(X,val) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 163) do { \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 164) _FP_UNPACK_RAW_2(Q,X,val); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 165) _FP_UNPACK_CANONICAL(Q,2,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 166) } while (0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 167)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 168) #define FP_UNPACK_QP(X,val) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 169) do { \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 170) _FP_UNPACK_RAW_2_P(Q,X,val); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 171) _FP_UNPACK_CANONICAL(Q,2,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 172) } while (0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 173)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 174) #define FP_PACK_Q(val,X) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 175) do { \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 176) _FP_PACK_CANONICAL(Q,2,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 177) _FP_PACK_RAW_2(Q,val,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 178) } while (0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 179)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 180) #define FP_PACK_QP(val,X) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 181) do { \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 182) _FP_PACK_CANONICAL(Q,2,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 183) if (!FP_INHIBIT_RESULTS) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 184) _FP_PACK_RAW_2_P(Q,val,X); \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 185) } while (0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 186)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 187) #define FP_ISSIGNAN_Q(X) _FP_ISSIGNAN(Q,2,X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 188) #define FP_NEG_Q(R,X) _FP_NEG(Q,2,R,X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 189) #define FP_ADD_Q(R,X,Y) _FP_ADD(Q,2,R,X,Y)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 190) #define FP_SUB_Q(R,X,Y) _FP_SUB(Q,2,R,X,Y)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 191) #define FP_MUL_Q(R,X,Y) _FP_MUL(Q,2,R,X,Y)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 192) #define FP_DIV_Q(R,X,Y) _FP_DIV(Q,2,R,X,Y)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 193) #define FP_SQRT_Q(R,X) _FP_SQRT(Q,2,R,X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 194) #define _FP_SQRT_MEAT_Q(R,S,T,X,Q) _FP_SQRT_MEAT_2(R,S,T,X,Q)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 195)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 196) #define FP_CMP_Q(r,X,Y,un) _FP_CMP(Q,2,r,X,Y,un)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 197) #define FP_CMP_EQ_Q(r,X,Y) _FP_CMP_EQ(Q,2,r,X,Y)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 198)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 199) #define FP_TO_INT_Q(r,X,rsz,rsg) _FP_TO_INT(Q,2,r,X,rsz,rsg)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 200) #define FP_TO_INT_ROUND_Q(r,X,rsz,rsg) _FP_TO_INT_ROUND(Q,2,r,X,rsz,rsg)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 201) #define FP_FROM_INT_Q(X,r,rs,rt) _FP_FROM_INT(Q,2,X,r,rs,rt)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 202)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 203) #define _FP_FRAC_HIGH_Q(X) _FP_FRAC_HIGH_2(X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 204) #define _FP_FRAC_HIGH_RAW_Q(X) _FP_FRAC_HIGH_2(X)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 205)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 206) #endif /* not _FP_W_TYPE_SIZE < 64 */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 207)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 208) #endif /* __MATH_EMU_QUAD_H__ */