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>