diff options
| author | mrg <mrg@NetBSD.org> | 2011-07-04 11:22:39 +0000 |
|---|---|---|
| committer | mrg <mrg@NetBSD.org> | 2011-07-04 11:22:39 +0000 |
| commit | eb533c43faa1f980277fb2fb6a56c5234dfd3331 (patch) | |
| tree | 1e51087a67e16bcc05fcd5ab89724116c01f8d39 /lib/libc | |
| parent | dabe9235d0b80a6e0a0f5a7c0f8a913d37cdf9a1 (diff) | |
add support for __floatunsisf().
Diffstat (limited to 'lib/libc')
| -rw-r--r-- | lib/libc/quad/Makefile.inc | 4 | ||||
| -rw-r--r-- | lib/libc/quad/floatundisf.c | 71 |
2 files changed, 73 insertions, 2 deletions
diff --git a/lib/libc/quad/Makefile.inc b/lib/libc/quad/Makefile.inc index 022e806e5b5..065275b546f 100644 --- a/lib/libc/quad/Makefile.inc +++ b/lib/libc/quad/Makefile.inc @@ -1,9 +1,9 @@ -# $NetBSD: Makefile.inc,v 1.12 2011/07/04 06:23:50 matt Exp $ +# $NetBSD: Makefile.inc,v 1.13 2011/07/04 11:22:39 mrg Exp $ # @(#)Makefile.inc 8.1 (Berkeley) 6/4/93 # Quad support SRCS.quad= cmpdi2.c divdi3.c fixdfdi.c fixsfdi.c fixunsdfdi.c \ - fixunssfdi.c floatdidf.c floatdisf.c floatundidf.c \ + fixunssfdi.c floatdidf.c floatdisf.c floatundisf.c floatundidf.c \ moddi3.c muldi3.c negdi2.c qdivrem.c \ ucmpdi2.c udivdi3.c umoddi3.c diff --git a/lib/libc/quad/floatundisf.c b/lib/libc/quad/floatundisf.c new file mode 100644 index 00000000000..ab5be920979 --- /dev/null +++ b/lib/libc/quad/floatundisf.c @@ -0,0 +1,71 @@ +/* $NetBSD: floatundisf.c,v 1.1 2011/07/04 11:22:39 mrg Exp $ */ + +/*- + * Copyright (c) 1992, 1993 + * The Regents of the University of California. All rights reserved. + * + * This software was developed by the Computer Systems Engineering group + * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and + * contributed to Berkeley. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + */ + +#include <sys/cdefs.h> +#if defined(LIBC_SCCS) && !defined(lint) +#if 0 +static char sccsid[] = "@(#)floatdisf.c 8.1 (Berkeley) 6/4/93"; +#else +__RCSID("$NetBSD: floatundisf.c,v 1.1 2011/07/04 11:22:39 mrg Exp $"); +#endif +#endif /* LIBC_SCCS and not lint */ + +#include "quad.h" + +/* + * Convert (unsigned) quad to float. + */ +float +__floatundisf(u_quad_t x) +{ + float f; + union uu u; + + u.q = x; + + /* + * Now u.ul[H] has the factor of 2^32 (or whatever) and u.ul[L] + * has the units. Ideally we could just set f, add INT_BITS to + * its exponent, and then add the units, but this is portable + * code and does not know how to get at an exponent. Machine- + * specific code may be able to do this more efficiently. + * + * Using double here may be excessive paranoia. + */ + f = (double)u.ul[H] * (((int)1 << (INT_BITS - 2)) * 4.0); + f += u.ul[L]; + + return f; +} |
