qnan.c File Reference

#include "arith.h"
#include <stdio.h>

Include dependency graph for qnan.c:

Go to the source code of this file.

Macros
#define	Long   long
#define	UL   (unsigned long)

Typedefs
typedef unsigned Long	Ulong

Functions
int	main (void)

Macro Definition Documentation

Long

#define Long   long

Definition at line 49 of file qnan.c.

UL

#define UL   (unsigned long)

Definition at line 66 of file qnan.c.

Typedef Documentation

Ulong

typedef unsigned Long Ulong

Definition at line 52 of file qnan.c.

Function Documentation

main()

int main

(

void

)

Definition at line 68 of file qnan.c.

{
#ifdef HAVE_IEEE
    typedef union
    {
        float f;
        double d;
        Ulong L[4];
#ifndef NO_LONG_LONG
        unsigned short u[5];
        long double D;
#endif
    } U;
    U a, b, c;
    int i;

    a.L[0] = b.L[0] = 0x7f800000;
    c.f = a.f - b.f;
    printf("#define f_QNAN 0x%lx\n", UL c.L[0]);
    a.L[_0] = b.L[_0] = 0x7ff00000;
    a.L[_1] = b.L[_1] = 0;
    c.d = a.d - b.d; /* quiet NaN */
    printf("#define d_QNAN0 0x%lx\n", UL c.L[0]);
    printf("#define d_QNAN1 0x%lx\n", UL c.L[1]);
#ifdef NO_LONG_LONG
    for(i = 0; i < 4; i++)
        printf("#define ld_QNAN%d 0xffffffff\n", i);
    for(i = 0; i < 5; i++)
        printf("#define ldus_QNAN%d 0xffff\n", i);
#else
    b.D = c.D = a.d;
    if(printf("") < 0)
        c.D = 37; /* never executed; just defeat optimization */
    a.L[2] = a.L[3] = 0;
    a.D = b.D - c.D;
    for(i = 0; i < 4; i++)
        printf("#define ld_QNAN%d 0x%lx\n", i, UL a.L[i]);
    for(i = 0; i < 5; i++)
        printf("#define ldus_QNAN%d 0x%x\n", i, a.u[i]);
#endif
#endif /* HAVE_IEEE */
    return 0;
}

References U::d, U::L, and UL.