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