OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [libgcc/] [config/] [lm32/] [sfp-machine.h] - Blame information for rev 801

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 734 jeremybenn
#define _FP_W_TYPE_SIZE         32
2
#define _FP_W_TYPE              unsigned long
3
#define _FP_WS_TYPE             signed long
4
#define _FP_I_TYPE              long
5
 
6
#define _FP_MUL_MEAT_S(R,X,Y)                           \
7
  _FP_MUL_MEAT_1_wide(_FP_WFRACBITS_S,R,X,Y,umul_ppmm)
8
#define _FP_MUL_MEAT_D(R,X,Y)                           \
9
  _FP_MUL_MEAT_2_wide(_FP_WFRACBITS_D,R,X,Y,umul_ppmm)
10
#define _FP_MUL_MEAT_Q(R,X,Y)                           \
11
  _FP_MUL_MEAT_4_wide(_FP_WFRACBITS_Q,R,X,Y,umul_ppmm)
12
 
13
#define _FP_DIV_MEAT_S(R,X,Y)   _FP_DIV_MEAT_1_loop(S,R,X,Y)
14
#define _FP_DIV_MEAT_D(R,X,Y)   _FP_DIV_MEAT_2_udiv(D,R,X,Y)
15
#define _FP_DIV_MEAT_Q(R,X,Y)   _FP_DIV_MEAT_4_udiv(Q,R,X,Y)
16
 
17
#define _FP_NANFRAC_S           ((_FP_QNANBIT_S << 1) - 1)
18
#define _FP_NANFRAC_D           ((_FP_QNANBIT_D << 1) - 1), -1
19
#define _FP_NANFRAC_Q           ((_FP_QNANBIT_Q << 1) - 1), -1, -1, -1
20
#define _FP_NANSIGN_S           0
21
#define _FP_NANSIGN_D           0
22
#define _FP_NANSIGN_Q           0
23
 
24
#define _FP_KEEPNANFRACP 1
25
 
26
/* Someone please check this.  */
27
#define _FP_CHOOSENAN(fs, wc, R, X, Y, OP)                      \
28
  do {                                                          \
29
    if ((_FP_FRAC_HIGH_RAW_##fs(X) & _FP_QNANBIT_##fs)          \
30
        && !(_FP_FRAC_HIGH_RAW_##fs(Y) & _FP_QNANBIT_##fs))     \
31
      {                                                         \
32
        R##_s = Y##_s;                                          \
33
        _FP_FRAC_COPY_##wc(R,Y);                                \
34
      }                                                         \
35
    else                                                        \
36
      {                                                         \
37
        R##_s = X##_s;                                          \
38
        _FP_FRAC_COPY_##wc(R,X);                                \
39
      }                                                         \
40
    R##_c = FP_CLS_NAN;                                         \
41
  } while (0)
42
 
43
#define __LITTLE_ENDIAN 1234
44
#define __BIG_ENDIAN    4321
45
 
46
#define __BYTE_ORDER __BIG_ENDIAN
47
 
48
/* Define ALIASNAME as a strong alias for NAME.  */
49
# define strong_alias(name, aliasname) _strong_alias(name, aliasname)
50
# define _strong_alias(name, aliasname) \
51
  extern __typeof (name) aliasname __attribute__ ((alias (#name)));

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.