arch/sparc64/math-emu/sfp-machine.h

   1 /* Machine-dependent software floating-point definitions.
   2    Sparc64 kernel version.
   3    Copyright (C) 1997,1998,1999 Free Software Foundation, Inc.
   4    This file is part of the GNU C Library.
   5    Contributed by Richard Henderson (rth@cygnus.com),
   6                   Jakub Jelinek (jj@ultra.linux.cz) and
   7                   David S. Miller (davem@redhat.com).
   8
   9    The GNU C Library is free software; you can redistribute it and/or
  10    modify it under the terms of the GNU Library General Public License as
  11    published by the Free Software Foundation; either version 2 of the
  12    License, or (at your option) any later version.
  13
  14    The GNU C Library is distributed in the hope that it will be useful,
  15    but WITHOUT ANY WARRANTY; without even the implied warranty of
  16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17    Library General Public License for more details.
  18
  19    You should have received a copy of the GNU Library General Public
  20    License along with the GNU C Library; see the file COPYING.LIB.  If
  21    not, write to the Free Software Foundation, Inc.,
  22    59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  23
  24 #ifndef _SFP_MACHINE_H
  25 #define _SFP_MACHINE_H
  26
  27 #define _FP_W_TYPE_SIZE         64
  28 #define _FP_W_TYPE              unsigned long
  29 #define _FP_WS_TYPE             signed long
  30 #define _FP_I_TYPE              long
  31
  32 #define _FP_MUL_MEAT_S(R,X,Y)   _FP_MUL_MEAT_1_imm(S,R,X,Y)
  33 #define _FP_MUL_MEAT_D(R,X,Y)   _FP_MUL_MEAT_1_wide(D,R,X,Y,umul_ppmm)
  34 #define _FP_MUL_MEAT_Q(R,X,Y)   _FP_MUL_MEAT_2_wide_3mul(Q,R,X,Y,umul_ppmm)
  35
  36 #define _FP_DIV_MEAT_S(R,X,Y)   _FP_DIV_MEAT_1_imm(S,R,X,Y,_FP_DIV_HELP_imm)
  37 #define _FP_DIV_MEAT_D(R,X,Y)   _FP_DIV_MEAT_1_udiv(D,R,X,Y)
  38 #define _FP_DIV_MEAT_Q(R,X,Y)   _FP_DIV_MEAT_2_udiv(Q,R,X,Y)
  39
  40 #define _FP_NANFRAC_S           ((_FP_QNANBIT_S << 1) - 1)
  41 #define _FP_NANFRAC_D           ((_FP_QNANBIT_D << 1) - 1)
  42 #define _FP_NANFRAC_Q           ((_FP_QNANBIT_Q << 1) - 1), -1
  43 #define _FP_NANSIGN_S           0
  44 #define _FP_NANSIGN_D           0
  45 #define _FP_NANSIGN_Q           0
  46
  47 #define _FP_KEEPNANFRACP 1
  48
  49 /* If one NaN is signaling and the other is not,
  50  * we choose that one, otherwise we choose X.
  51  */
  52 /* For _Qp_* and _Q_*, this should prefer X, for
  53  * CPU instruction emulation this should prefer Y.
  54  * (see SPAMv9 B.2.2 section).
  55  */
  56 #define _FP_CHOOSENAN(fs, wc, R, X, Y)                          \
  57   do {                                                          \
  58     if ((_FP_FRAC_HIGH_RAW_##fs(Y) & _FP_QNANBIT_##fs)          \
  59         && !(_FP_FRAC_HIGH_RAW_##fs(X) & _FP_QNANBIT_##fs))     \
  60       {                                                         \
  61         R##_s = X##_s;                                          \
  62         _FP_FRAC_COPY_##wc(R,X);                                \
  63       }                                                         \
  64     else                                                        \
  65       {                                                         \
  66         R##_s = Y##_s;                                          \
  67         _FP_FRAC_COPY_##wc(R,Y);                                \
  68       }                                                         \
  69     R##_c = FP_CLS_NAN;                                         \
  70   } while (0)
  71
  72 /* Obtain the current rounding mode. */
  73 #ifndef FP_ROUNDMODE
  74 #define FP_ROUNDMODE    ((current->tss.xfsr[0] >> 30) & 0x3)
  75 #endif
  76
  77 /* Exception flags. */
  78 #define FP_EX_INVALID           (1 << 4)
  79 #define FP_EX_OVERFLOW          (1 << 3)
  80 #define FP_EX_UNDERFLOW         (1 << 2)
  81 #define FP_EX_DIVZERO           (1 << 1)
  82 #define FP_EX_INEXACT           (1 << 0)
  83
  84 #define FP_HANDLE_EXCEPTIONS return _fex
  85
  86 #define FP_INHIBIT_RESULTS ((current->tss.xfsr[0] >> 23) & _fex)
  87
  88 #endif