Return to isfinitel_ieee754.c CVS log

Up to [cvs.NetBSD.org] / src / lib / libc / gen

Annotation of src/lib/libc/gen/isfinitel_ieee754.c, Revision 1.1

1.1     ! matt        1: /*     $NetBSD: isfinited_ieee754.c,v 1.2 2008/04/28 20:22:59 martin Exp $     */
        !             2:
        !             3: /*-
        !             4:  * Copyright (c) 2011 The NetBSD Foundation, Inc.
        !             5:  * All rights reserved.
        !             6:  *
        !             7:  * This code is derived from software contributed to The NetBSD Foundation
        !             8:  * by Matt Thomas.
        !             9:  *
        !            10:  * Redistribution and use in source and binary forms, with or without
        !            11:  * modification, are permitted provided that the following conditions
        !            12:  * are met:
        !            13:  * 1. Redistributions of source code must retain the above copyright
        !            14:  *    notice, this list of conditions and the following disclaimer.
        !            15:  * 2. Redistributions in binary form must reproduce the above copyright
        !            16:  *    notice, this list of conditions and the following disclaimer in the
        !            17:  *    documentation and/or other materials provided with the distribution.
        !            18:  *
        !            19:  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
        !            20:  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
        !            21:  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
        !            22:  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
        !            23:  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
        !            24:  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
        !            25:  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
        !            26:  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
        !            27:  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
        !            28:  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
        !            29:  * POSSIBILITY OF SUCH DAMAGE.
        !            30:  */
        !            31:
        !            32: #include <sys/cdefs.h>
        !            33: #if defined(LIBC_SCCS) && !defined(lint)
        !            34: __RCSID("$NetBSD: isfinited_ieee754.c,v 1.2 2008/04/28 20:22:59 martin Exp $");
        !            35: #endif
        !            36:
        !            37: #include <machine/ieee.h>
        !            38: #include <math.h>
        !            39:
        !            40: #ifdef __HAVE_LONG_DOUBLE
        !            41: /*
        !            42:  * 7.12.3.2 isfinite - determine whether an argument has finite value
        !            43:  *          IEEE 754 compatible 128-bit extended-precision version
        !            44:  */
        !            45: int
        !            46: __isfinitel(long double x)
        !            47: {
        !            48:        union ieee_ext_u u;
        !            49:
        !            50:        u.extu_ld = x;
        !            51:
        !            52:        if (u.extu_ext.ext_exp == EXT_EXP_INFNAN)
        !            53:                return 0;
        !            54:
        !            55:        return 1;
        !            56: }
        !            57: #endif /* __HAVE_LONG_DOUBLE */