1/* $NetBSD: unordtf2.c,v 1.1 2014/01/30 19:06:54 matt 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: unordtf2.c,v 1.1 2014/01/30 19:06:54 matt Exp $"); 14#endif /* LIBC_SCCS and not lint */ 15 16#ifdef FLOAT128 17 18flag __unordtf2(float128, float128); 19 20flag 21__unordtf2(float128 a, float128 b) 22{ 23 /* 24 * The comparison is unordered if either input is a NaN. 25 * Test for this by comparing each operand with itself. 26 * We must perform both comparisons to correctly check for 27 * signalling NaNs. 28 */ 29 return 1 ^ (float128_eq(a, a) & float128_eq(b, b)); 30} 31 32#endif /* FLOAT128 */ 33