StdLib/LibC/Softfloat/unorddf2.c

   1 /* $NetBSD: unorddf2.c,v 1.1 2003/05/06 08:58:19 rearnsha Exp $ */
   2 /** @file
   3 *
   4 *  Copyright (c) 2013 - 2014, ARM Limited. All rights reserved.
   5 *
   6 *  This program and the accompanying materials
   7 *  are licensed and made available under the terms and conditions of the BSD License
   8 *  which accompanies this distribution.  The full text of the license may be found at
   9 *  http://opensource.org/licenses/bsd-license.php
  10 *
  11 *  THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS" BASIS,
  12 *  WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED.
  13 *
  14 **/
  15 /*
  16  * Written by Richard Earnshaw, 2003.  This file is in the Public Domain.
  17  */
  18
  19 #include "softfloat-for-gcc.h"
  20 #include "milieu.h"
  21 #include "softfloat.h"
  22
  23 #include <sys/cdefs.h>
  24 #if defined(LIBC_SCCS) && !defined(lint)
  25 __RCSID("$NetBSD: unorddf2.c,v 1.1 2003/05/06 08:58:19 rearnsha Exp $");
  26 #endif /* LIBC_SCCS and not lint */
  27
  28 flag __unorddf2(float64, float64);
  29
  30 flag
  31 __unorddf2(float64 a, float64 b)
  32 {
  33     /*
  34      * The comparison is unordered if either input is a NaN.
  35      * Test for this by comparing each operand with itself.
  36      * We must perform both comparisons to correctly check for
  37      * signalling NaNs.
  38      */
  39     return 1 ^ (float64_eq(a, a) & float64_eq(b, b));
  40 }