fpclassify2_test.c revision 110569
1110405Smike/*-
2110405Smike * Copyright (c) 2003 Mike Barcroft <mike@FreeBSD.org>
3110405Smike * All rights reserved.
4110405Smike *
5110405Smike * Redistribution and use in source and binary forms, with or without
6110405Smike * modification, are permitted provided that the following conditions
7110405Smike * are met:
8110405Smike * 1. Redistributions of source code must retain the above copyright
9110405Smike *    notice, this list of conditions and the following disclaimer.
10110405Smike * 2. Redistributions in binary form must reproduce the above copyright
11110405Smike *    notice, this list of conditions and the following disclaimer in the
12110405Smike *    documentation and/or other materials provided with the distribution.
13110405Smike *
14110405Smike * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15110405Smike * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16110405Smike * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17110405Smike * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18110405Smike * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19110405Smike * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20110405Smike * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21110405Smike * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22110405Smike * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23110405Smike * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24110405Smike * SUCH DAMAGE.
25110405Smike *
26110405Smike * $FreeBSD: head/tools/regression/lib/libc/gen/test-fpclassify.c 110569 2003-02-08 20:45:48Z mike $
27110405Smike */
28110405Smike
29110405Smike#include <assert.h>
30110405Smike#include <math.h>
31110405Smike#include <stdlib.h>
32110405Smike
33110405Smikeint
34110405Smikemain(void)
35110405Smike{
36110405Smike
37110405Smike	assert(fpclassify((float)0) == FP_ZERO);
38110405Smike	assert(fpclassify((float)-0) == FP_ZERO);
39110405Smike	assert(fpclassify((float)1) == FP_NORMAL);
40110405Smike	assert(fpclassify((float)1000) == FP_NORMAL);
41110405Smike#ifndef __alpha__
42110405Smike	assert(fpclassify(0x1.2p-150f) == FP_SUBNORMAL);
43110405Smike#endif
44110405Smike	assert(fpclassify(HUGE_VALF) == FP_INFINITE);
45110569Smike	assert(fpclassify((float)HUGE_VAL) == FP_INFINITE);
46110569Smike	assert(fpclassify((float)HUGE_VALL) == FP_INFINITE);
47110405Smike	assert(fpclassify(NAN) == FP_NAN);
48110405Smike
49110405Smike	assert(fpclassify((double)0) == FP_ZERO);
50110405Smike	assert(fpclassify((double)-0) == FP_ZERO);
51110405Smike	assert(fpclassify((double)1) == FP_NORMAL);
52110405Smike	assert(fpclassify((double)1000) == FP_NORMAL);
53110405Smike#ifndef __alpha__
54110405Smike	assert(fpclassify(0x1.2p-1075) == FP_SUBNORMAL);
55110405Smike#endif
56110405Smike	assert(fpclassify(HUGE_VAL) == FP_INFINITE);
57110569Smike	assert(fpclassify((double)HUGE_VALF) == FP_INFINITE);
58110569Smike	assert(fpclassify((double)HUGE_VALL) == FP_INFINITE);
59110405Smike	assert(fpclassify((double)NAN) == FP_NAN);
60110405Smike
61110405Smike	assert(fpclassify((long double)0) == FP_ZERO);
62110405Smike	assert(fpclassify((long double)-0) == FP_ZERO);
63110405Smike	assert(fpclassify((long double)1) == FP_NORMAL);
64110405Smike	assert(fpclassify((long double)1000) == FP_NORMAL);
65110405Smike#ifndef __alpha__
66110405Smike	assert(fpclassify(0x1.2p-16383L) == FP_SUBNORMAL);
67110405Smike#endif
68110405Smike	assert(fpclassify(HUGE_VALL) == FP_INFINITE);
69110569Smike	assert(fpclassify((long double)HUGE_VALF) == FP_INFINITE);
70110569Smike	assert(fpclassify((long double)HUGE_VAL) == FP_INFINITE);
71110405Smike	assert(fpclassify((long double)NAN) == FP_NAN);
72110405Smike
73110405Smike	printf("PASS fpclassify()\n");
74110405Smike	exit(0);
75110405Smike}
76