lib/libc/arch/arm/softfloat/__aeabi_dcmpun.c

   1 /* $NetBSD: __aeabi_dcmpun.c,v 1.1 2013/04/16 10:37:39 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: __aeabi_dcmpun.c,v 1.1 2013/04/16 10:37:39 matt Exp $");
  14 #endif /* LIBC_SCCS and not lint */
  15
  16 int __aeabi_dcmpun(float64, float64);
  17
  18 int
  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 }