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