diff options
author | martynas <> | 2008-09-07 20:36:10 +0000 |
---|---|---|
committer | martynas <> | 2008-09-07 20:36:10 +0000 |
commit | fe4b8d40f2a6b20c26c7ef61d14dd8cd5582a6ed (patch) | |
tree | 8b94bbd0fbccd3b996e0c26a613b6a38022f03a7 /src/regress/lib/libc/fpclassify/fpclassify.c | |
parent | f7077f2415e37a53ccd37311ae6190e7238fe3e7 (diff) | |
download | openbsd-fe4b8d40f2a6b20c26c7ef61d14dd8cd5582a6ed.tar.gz openbsd-fe4b8d40f2a6b20c26c7ef61d14dd8cd5582a6ed.tar.bz2 openbsd-fe4b8d40f2a6b20c26c7ef61d14dd8cd5582a6ed.zip |
- replace dtoa w/ David's gdtoa, version 2008-03-15
- provide proper dtoa locks
- use the real strtof implementation
- add strtold, __hdtoa, __hldtoa
- add %a/%A support
- don't lose precision in printf, don't round to double anymore
- implement extended-precision versions of libc functions: fpclassify,
isnan, isinf, signbit, isnormal, isfinite, now that the ieee.h is
fixed
- separate vax versions of strtof, and __hdtoa
- add complex math support. added functions: cacos, casin, catan,
ccos, csin, ctan, cacosh, casinh, catanh, ccosh, csinh, ctanh, cexp,
clog, cabs, cpow, csqrt, carg, cimag, conj, cproj, creal, cacosf,
casinf, catanf, ccosf, csinf, ctanf, cacoshf, casinhf, catanhf,
ccoshf, csinhf, ctanhf, cexpf, clogf, cabsf, cpowf, csqrtf, cargf,
cimagf, conjf, cprojf, crealf
- add fdim, fmax, fmin
- add log2. (adapted implementation e_log.c. could be more acruate
& faster, but it's good enough for now)
- remove wrappers & cruft in libm, supposed to work-around mistakes
in SVID, etc.; use ieee versions. fixes issues in python 2.6 for
djm@
- make _digittoint static
- proper definitions for i386, and amd64 in ieee.h
- sh, powerpc don't really have extended-precision
- add missing definitions for mips64 (quad), m{6,8}k (96-bit) float.h
for LDBL_*
- merge lead to frac for m{6,8}k, for gdtoa to work properly
- add FRAC*BITS & EXT_TO_ARRAY32 definitions in ieee.h, for hdtoa&ldtoa
to use
- add EXT_IMPLICIT_NBIT definition, which indicates implicit
normalization bit
- add regression tests for libc: fpclassify and printf
- arith.h & gd_qnan.h definitions
- update ieee.h: hppa doesn't have quad-precision, hppa64 does
- add missing prototypes to gdtoaimp
- on 64-bit platforms make sure gdtoa doesn't use a long when it
really wants an int
- etc., what i may have forgotten...
- bump libm major, due to removed&changed symbols
- no libc bump, since this is riding on djm's libc major crank from
a day ago
discussed with / requested by / testing theo, sthen@, djm@, jsg@,
merdely@, jsing@, tedu@, brad@, jakemsr@, and others.
looks good to millert@
parts of the diff ok kettenis@
this commit does not include:
- man page changes
Diffstat (limited to 'src/regress/lib/libc/fpclassify/fpclassify.c')
-rw-r--r-- | src/regress/lib/libc/fpclassify/fpclassify.c | 76 |
1 files changed, 76 insertions, 0 deletions
diff --git a/src/regress/lib/libc/fpclassify/fpclassify.c b/src/regress/lib/libc/fpclassify/fpclassify.c new file mode 100644 index 0000000000..174c04d983 --- /dev/null +++ b/src/regress/lib/libc/fpclassify/fpclassify.c | |||
@@ -0,0 +1,76 @@ | |||
1 | /* $OpenBSD: fpclassify.c,v 1.1 2008/09/07 20:36:10 martynas Exp $ */ | ||
2 | /*- | ||
3 | * Copyright (c) 2003 Mike Barcroft <mike@FreeBSD.org> | ||
4 | * All rights reserved. | ||
5 | * | ||
6 | * Redistribution and use in source and binary forms, with or without | ||
7 | * modification, are permitted provided that the following conditions | ||
8 | * are met: | ||
9 | * 1. Redistributions of source code must retain the above copyright | ||
10 | * notice, this list of conditions and the following disclaimer. | ||
11 | * 2. Redistributions in binary form must reproduce the above copyright | ||
12 | * notice, this list of conditions and the following disclaimer in the | ||
13 | * documentation and/or other materials provided with the distribution. | ||
14 | * | ||
15 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND | ||
16 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
17 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||
18 | * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE | ||
19 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | ||
20 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | ||
21 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
22 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | ||
23 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | ||
24 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | ||
25 | * SUCH DAMAGE. | ||
26 | * | ||
27 | * $FreeBSD: src/tools/regression/lib/libc/gen/test-fpclassify.c,v 1.3 2003/03/27 05:32:28 das Exp $ | ||
28 | */ | ||
29 | |||
30 | #include <assert.h> | ||
31 | #include <float.h> | ||
32 | #include <math.h> | ||
33 | #include <stdlib.h> | ||
34 | |||
35 | int | ||
36 | main(void) | ||
37 | { | ||
38 | |||
39 | assert(fpclassify((float)0) == FP_ZERO); | ||
40 | assert(fpclassify((float)-0.0) == FP_ZERO); | ||
41 | assert(fpclassify((float)1) == FP_NORMAL); | ||
42 | assert(fpclassify((float)1000) == FP_NORMAL); | ||
43 | #ifndef __alpha__ | ||
44 | assert(fpclassify(0x1.2p-150f) == FP_SUBNORMAL); | ||
45 | #endif /* !__alpha__ */ | ||
46 | assert(fpclassify(HUGE_VALF) == FP_INFINITE); | ||
47 | assert(fpclassify((float)HUGE_VAL) == FP_INFINITE); | ||
48 | assert(fpclassify((float)HUGE_VALL) == FP_INFINITE); | ||
49 | assert(fpclassify(NAN) == FP_NAN); | ||
50 | |||
51 | assert(fpclassify((double)0) == FP_ZERO); | ||
52 | assert(fpclassify((double)-0) == FP_ZERO); | ||
53 | assert(fpclassify((double)1) == FP_NORMAL); | ||
54 | assert(fpclassify((double)1000) == FP_NORMAL); | ||
55 | #ifndef __alpha__ | ||
56 | assert(fpclassify(0x1.2p-1075) == FP_SUBNORMAL); | ||
57 | #endif /* !__alpha__ */ | ||
58 | assert(fpclassify(HUGE_VAL) == FP_INFINITE); | ||
59 | assert(fpclassify((double)HUGE_VALF) == FP_INFINITE); | ||
60 | assert(fpclassify((double)HUGE_VALL) == FP_INFINITE); | ||
61 | assert(fpclassify((double)NAN) == FP_NAN); | ||
62 | |||
63 | assert(fpclassify((long double)0) == FP_ZERO); | ||
64 | assert(fpclassify((long double)-0.0) == FP_ZERO); | ||
65 | assert(fpclassify((long double)1) == FP_NORMAL); | ||
66 | assert(fpclassify((long double)1000) == FP_NORMAL); | ||
67 | #if (LDBL_MANT_DIG > DBL_MANT_DIG) | ||
68 | assert(fpclassify(0x1.2p-16383L) == FP_SUBNORMAL); | ||
69 | #endif /* (LDBL_MANT_DIG > DBL_MANT_DIG) */ | ||
70 | assert(fpclassify(HUGE_VALL) == FP_INFINITE); | ||
71 | assert(fpclassify((long double)HUGE_VALF) == FP_INFINITE); | ||
72 | assert(fpclassify((long double)HUGE_VAL) == FP_INFINITE); | ||
73 | assert(fpclassify((long double)NAN) == FP_NAN); | ||
74 | |||
75 | return (0); | ||
76 | } | ||