Return to s_isinff.c CVS log

Up to [cvs.NetBSD.org] / src / lib / libm / src

Annotation of src/lib/libm/src/s_isinff.c, Revision 1.2

1.1       jtc         1: /*
                      2:  * Copyright (c) 1994 Winning Strategies, Inc.
                      3:  * All rights reserved.
                      4:  *
                      5:  * Redistribution and use in source and binary forms, with or without
                      6:  * modification, are permitted provided that the following conditions
                      7:  * are met:
                      8:  * 1. Redistributions of source code must retain the above copyright
                      9:  *    notice, this list of conditions and the following disclaimer.
                     10:  * 2. Redistributions in binary form must reproduce the above copyright
                     11:  *    notice, this list of conditions and the following disclaimer in the
                     12:  *    documentation and/or other materials provided with the distribution.
                     13:  * 3. All advertising materials mentioning features or use of this software
                     14:  *    must display the following acknowledgement:
                     15:  *      This product includes software developed by Winning Strategies, Inc.
                     16:  * 4. The name of the author may not be used to endorse or promote products
                     17:  *    derived from this software without specific prior written permission.
                     18:  *
                     19:  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
                     20:  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
                     21:  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
                     22:  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
                     23:  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
                     24:  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
                     25:  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
                     26:  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
                     27:  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
                     28:  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
                     29:  */
                     30:
                     31: #if defined(LIBM_SCCS) && !defined(lint)
1.2     ! jtc        32: static char rcsid[] = "$NetBSD: s_isinff.c,v 1.1 1994/09/25 17:29:50 jtc Exp $";
1.1       jtc        33: #endif
                     34:
                     35: /*
                     36:  * isinff(x) returns 1 is x is inf, else 0;
                     37:  * no branching!
                     38:  */
                     39:
                     40: #include "math.h"
                     41: #include "math_private.h"
                     42:
                     43: #ifdef __STDC__
                     44:        int isinff(float x)
                     45: #else
                     46:        int isinff(x)
                     47:        float x;
                     48: #endif
                     49: {
                     50:        int32_t ix;
                     51:        GET_FLOAT_WORD(ix,x);
                     52:        ix &= 0x7fffffff;
                     53:        ix ^= 0x7f800000;
                     54:        return (ix == 0);
                     55: }