2 * Copyright (c) 2003 Mike Barcroft <mike@FreeBSD.org>
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
37 assert(fpclassify((float)0) == FP_ZERO
);
38 assert(fpclassify((float)-0.0) == FP_ZERO
);
39 assert(fpclassify((float)1) == FP_NORMAL
);
40 assert(fpclassify((float)1000) == FP_NORMAL
);
42 assert(fpclassify(0x1.2p
-150f
) == FP_SUBNORMAL
);
44 assert(fpclassify(HUGE_VALF
) == FP_INFINITE
);
45 assert(fpclassify((float)HUGE_VAL
) == FP_INFINITE
);
46 assert(fpclassify((float)HUGE_VALL
) == FP_INFINITE
);
47 assert(fpclassify(NAN
) == FP_NAN
);
49 assert(fpclassify((double)0) == FP_ZERO
);
50 assert(fpclassify((double)-0) == FP_ZERO
);
51 assert(fpclassify((double)1) == FP_NORMAL
);
52 assert(fpclassify((double)1000) == FP_NORMAL
);
54 assert(fpclassify(0x1.2p
-1075) == FP_SUBNORMAL
);
56 assert(fpclassify(HUGE_VAL
) == FP_INFINITE
);
57 assert(fpclassify((double)HUGE_VALF
) == FP_INFINITE
);
58 assert(fpclassify((double)HUGE_VALL
) == FP_INFINITE
);
59 assert(fpclassify((double)NAN
) == FP_NAN
);
61 assert(fpclassify((long double)0) == FP_ZERO
);
62 assert(fpclassify((long double)-0.0) == FP_ZERO
);
63 assert(fpclassify((long double)1) == FP_NORMAL
);
64 assert(fpclassify((long double)1000) == FP_NORMAL
);
66 assert(fpclassify(0x1.2p
-16383L) == FP_SUBNORMAL
);
68 assert(fpclassify(HUGE_VALL
) == FP_INFINITE
);
69 assert(fpclassify((long double)HUGE_VALF
) == FP_INFINITE
);
70 assert(fpclassify((long double)HUGE_VAL
) == FP_INFINITE
);
71 assert(fpclassify((long double)NAN
) == FP_NAN
);
73 printf("PASS fpclassify()\n");