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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [libgcc/] [config/] [score/] [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
/* The type of the result of a floating point comparison.  This must
7
   match `__libgcc_cmp_return__' in GCC for the target.  */
8
typedef int __gcc_CMPtype __attribute__ ((mode (__libgcc_cmp_return__)));
9
#define CMPtype __gcc_CMPtype
10
 
11
#define _FP_MUL_MEAT_S(R,X,Y)                           \
12
  _FP_MUL_MEAT_1_wide(_FP_WFRACBITS_S,R,X,Y,umul_ppmm)
13
#define _FP_MUL_MEAT_D(R,X,Y)                           \
14
  _FP_MUL_MEAT_2_wide(_FP_WFRACBITS_D,R,X,Y,umul_ppmm)
15
#define _FP_MUL_MEAT_Q(R,X,Y)                           \
16
  _FP_MUL_MEAT_4_wide(_FP_WFRACBITS_Q,R,X,Y,umul_ppmm)
17
 
18
#define _FP_DIV_MEAT_S(R,X,Y)   _FP_DIV_MEAT_1_loop(S,R,X,Y)
19
#define _FP_DIV_MEAT_D(R,X,Y)   _FP_DIV_MEAT_2_udiv(D,R,X,Y)
20
#define _FP_DIV_MEAT_Q(R,X,Y)   _FP_DIV_MEAT_4_udiv(Q,R,X,Y)
21
 
22
#define _FP_NANFRAC_S           ((_FP_QNANBIT_S << 1) - 1)
23
#define _FP_NANFRAC_D           ((_FP_QNANBIT_D << 1) - 1), -1
24
#define _FP_NANFRAC_Q           ((_FP_QNANBIT_Q << 1) - 1), -1, -1, -1
25
#define _FP_NANSIGN_S           0
26
#define _FP_NANSIGN_D           0
27
#define _FP_NANSIGN_Q           0
28
 
29
#define _FP_KEEPNANFRACP 1
30
 
31
/* Someone please check this.  */
32
#define _FP_CHOOSENAN(fs, wc, R, X, Y, OP)                      \
33
  do {                                                          \
34
    if ((_FP_FRAC_HIGH_RAW_##fs(X) & _FP_QNANBIT_##fs)          \
35
        && !(_FP_FRAC_HIGH_RAW_##fs(Y) & _FP_QNANBIT_##fs))     \
36
      {                                                         \
37
        R##_s = Y##_s;                                          \
38
        _FP_FRAC_COPY_##wc(R,Y);                                \
39
      }                                                         \
40
    else                                                        \
41
      {                                                         \
42
        R##_s = X##_s;                                          \
43
        _FP_FRAC_COPY_##wc(R,X);                                \
44
      }                                                         \
45
    R##_c = FP_CLS_NAN;                                         \
46
  } while (0)
47
 
48
#define __LITTLE_ENDIAN 1234
49
#define __BIG_ENDIAN    4321
50
 
51
# define __BYTE_ORDER __BIG_ENDIAN
52
 
53
/* Define ALIASNAME as a strong alias for NAME.  */
54
# define strong_alias(name, aliasname) _strong_alias(name, aliasname)
55
# define _strong_alias(name, aliasname) \
56
  extern __typeof (name) aliasname __attribute__ ((alias (#name)));
57
 

powered by: WebSVN 2.1.0

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