[BACK]Return to unordsf2.c CVS log [TXT][DIR] Up to [cvs.NetBSD.org] / src / lib / libc / softfloat

Annotation of src/lib/libc/softfloat/unordsf2.c, Revision 1.1

1.1     ! rearnsha    1: /* $NetBSD: gedf2.c,v 1.1 2000/06/06 08:15:05 bjh21 Exp $ */
        !             2:
        !             3: /*
        !             4:  * Written by Richard Earnshaw, 2003.  This file is in the Public Domain.
        !             5:  */
        !             6:
        !             7: #include "softfloat-for-gcc.h"
        !             8: #include "milieu.h"
        !             9: #include "softfloat.h"
        !            10:
        !            11: #include <sys/cdefs.h>
        !            12: #if defined(LIBC_SCCS) && !defined(lint)
        !            13: __RCSID("$NetBSD: gedf2.c,v 1.1 2000/06/06 08:15:05 bjh21 Exp $");
        !            14: #endif /* LIBC_SCCS and not lint */
        !            15:
        !            16: flag __unordsf2(float32, float32);
        !            17:
        !            18: flag
        !            19: __unordsf2(float32 a, float32 b)
        !            20: {
        !            21:        /*
        !            22:         * The comparison is unordered if either input is a NaN.
        !            23:         * Test for this by comparing each operand with itself.
        !            24:         * We must perform both comparisons to correctly check for
        !            25:         * signalling NaNs.
        !            26:         */
        !            27:        return 1 ^ (float32_eq(a, a) & float32_eq(b, b));
        !            28: }

CVSweb <webmaster@jp.NetBSD.org>