diff options
| author | martynas <> | 2008-09-07 20:36:10 +0000 |
|---|---|---|
| committer | martynas <> | 2008-09-07 20:36:10 +0000 |
| commit | d30b81e40cd0d7dfb503d245781316ee0a484ac2 (patch) | |
| tree | 8b94bbd0fbccd3b996e0c26a613b6a38022f03a7 /src/regress/lib/libc/fpclassify/fpclassify.c | |
| parent | f64196050125bd16f94b4c0735dffacc5c1515fb (diff) | |
| download | openbsd-d30b81e40cd0d7dfb503d245781316ee0a484ac2.tar.gz openbsd-d30b81e40cd0d7dfb503d245781316ee0a484ac2.tar.bz2 openbsd-d30b81e40cd0d7dfb503d245781316ee0a484ac2.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 | } | ||
