LongFloat.st
changeset 25049 1c82be43aa8b
parent 25036 a92213ab83ac
child 25053 e19e11facb6d
equal deleted inserted replaced
25048:500ca1e2ad84 25049:1c82be43aa8b
    71  */
    71  */
    72 # ifndef isnanl
    72 # ifndef isnanl
    73 #  define isnanl(x)      \
    73 #  define isnanl(x)      \
    74 	((((unsigned int *)(&x))[0] == 0x00000000) && \
    74 	((((unsigned int *)(&x))[0] == 0x00000000) && \
    75 	 (((unsigned int *)(&x))[1] == 0xC0000000) && \
    75 	 (((unsigned int *)(&x))[1] == 0xC0000000) && \
    76 	 (((unsigned short *)(&x))[4] == 0xFFFF))
    76 	 (((unsigned short *)(&x))[4] & 0x7FFF == 0x7FFF))
    77 # endif
    77 # endif
    78 
    78 
    79 # ifndef isnan
    79 # ifndef isnan
    80 #  define isnan(x)      \
    80 #  define isnan(x)      \
    81 	((((unsigned int *)(&x))[0] == 0x00000000) && \
    81 	((((unsigned int *)(&x))[1] & 0x7FF80000) == 0x7FF80000)
    82 	 (((unsigned int *)(&x))[1] == 0xFFF80000))
    82 // old, invalid definition
       
    83 // #  define isnan(x)      \
       
    84 //         ((((unsigned int *)(&x))[0] == 0x00000000) && \
       
    85 //          (((unsigned int *)(&x))[1] == 0xFFF80000))
    83 # endif
    86 # endif
    84 
    87 
    85 # ifndef isPositiveInfinity
    88 # ifndef isPositiveInfinity
    86 #  define isPositiveInfinity(x) \
    89 #  define isPositiveInfinity(x) \
    87 	((((unsigned int *)(&x))[0] == 0x00000000) && \
    90 	((((unsigned int *)(&x))[0] == 0x00000000) && \