Subversion Repositories or1k_soc_on_altera_embedded_dev_kit

#ifndef SOFT_FP_H

#define SOFT_FP_H

#include "sfp-machine.h"

#define _FP_WORKBITS            3

#define _FP_WORK_LSB            ((_FP_W_TYPE)1 << 3)

#define _FP_WORK_ROUND          ((_FP_W_TYPE)1 << 2)

#define _FP_WORK_GUARD          ((_FP_W_TYPE)1 << 1)

#define _FP_WORK_STICKY         ((_FP_W_TYPE)1 << 0)

#ifndef FP_RND_NEAREST

# define FP_RND_NEAREST         0

# define FP_RND_ZERO            1

# define FP_RND_PINF            2

# define FP_RND_MINF            3

#ifndef FP_ROUNDMODE

# define FP_ROUNDMODE           FP_RND_NEAREST

#endif

#endif

#define _FP_ROUND_NEAREST(wc, X)                        \

({  int __ret = 0;                                       \

    int __frac = _FP_FRAC_LOW_##wc(X) & 15;             \

    if (__frac & 7) {                                   \

      __ret = EFLAG_INEXACT;                            \

      if ((__frac & 7) != _FP_WORK_ROUND)               \

        _FP_FRAC_ADDI_##wc(X, _FP_WORK_ROUND);          \

      else if (__frac & _FP_WORK_LSB)                   \

        _FP_FRAC_ADDI_##wc(X, _FP_WORK_ROUND);          \

    }                                                   \

    __ret;                                              \

})

#define _FP_ROUND_ZERO(wc, X)                           \

({  int __ret = 0;                                       \

    if (_FP_FRAC_LOW_##wc(X) & 7)                       \

      __ret = EFLAG_INEXACT;                            \

    __ret;                                              \

})

#define _FP_ROUND_PINF(wc, X)                           \

({  int __ret = EFLAG_INEXACT;                          \

    if (!X##_s && (_FP_FRAC_LOW_##wc(X) & 7))           \

      _FP_FRAC_ADDI_##wc(X, _FP_WORK_LSB);              \

    else __ret = 0;                                      \

    __ret;                                              \

})

#define _FP_ROUND_MINF(wc, X)                           \

({  int __ret = EFLAG_INEXACT;                          \

    if (X##_s && (_FP_FRAC_LOW_##wc(X) & 7))            \

      _FP_FRAC_ADDI_##wc(X, _FP_WORK_LSB);              \

    else __ret = 0;                                      \

    __ret;                                              \

})

#define _FP_ROUND(wc, X)                        \

({      int __ret = 0;                           \

        switch (FP_ROUNDMODE)                   \

        {                                       \

          case FP_RND_NEAREST:                  \

            __ret |= _FP_ROUND_NEAREST(wc,X);   \

            break;                              \

          case FP_RND_ZERO:                     \

            __ret |= _FP_ROUND_ZERO(wc,X);      \

            break;                              \

          case FP_RND_PINF:                     \

            __ret |= _FP_ROUND_PINF(wc,X);      \

            break;                              \

          case FP_RND_MINF:                     \

            __ret |= _FP_ROUND_MINF(wc,X);      \

            break;                              \

        };                                      \

        __ret;                                  \

})

#define FP_CLS_NORMAL           0

#define FP_CLS_ZERO             1

#define FP_CLS_INF              2

#define FP_CLS_NAN              3

#define _FP_CLS_COMBINE(x,y)    (((x) << 2) | (y))

#include "op-1.h"

#include "op-2.h"

#include "op-4.h"

#include "op-common.h"

/* Sigh.  Silly things longlong.h needs.  */

#define UWtype          _FP_W_TYPE

#define W_TYPE_SIZE     _FP_W_TYPE_SIZE

typedef int SItype __attribute__((mode(SI)));

typedef int DItype __attribute__((mode(DI)));

typedef unsigned int USItype __attribute__((mode(SI)));

typedef unsigned int UDItype __attribute__((mode(DI)));

#if _FP_W_TYPE_SIZE == 32

typedef unsigned int UHWtype __attribute__((mode(HI)));

#elif _FP_W_TYPE_SIZE == 64

typedef USItype UHWtype;

#endif

#endif