1 /* $NetBSD: unorddf2.c,v 1.1 2003/05/06 08:58:19 rearnsha 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: unorddf2.c,v 1.1 2003/05/06 08:58:19 rearnsha Exp $"); 14 #endif /* LIBC_SCCS and not lint */ 15 16 flag __unorddf2(float64, float64); 17 18 flag 19 __unorddf2(float64 a, float64 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 ^ (float64_eq(a, a) & float64_eq(b, b)); 28 } 29