StdLib/LibC/Softfloat/unordtf2.c

   1 /* $NetBSD: unordtf2.c,v 1.2 2014/01/30 19:11:41 matt 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: unordtf2.c,v 1.2 2014/01/30 19:11:41 matt Exp $");
  26 #endif /* LIBC_SCCS and not lint */
  27
  28 #ifdef FLOAT128
  29
  30 flag __unordtf2(float128, float128);
  31
  32 flag
  33 __unordtf2(float128 a, float128 b)
  34 {
  35     /*
  36      * The comparison is unordered if either input is a NaN.
  37      * Test for this by comparing each operand with itself.
  38      * We must perform both comparisons to correctly check for
  39      * signalling NaNs.
  40      */
  41     return 1 ^ (float128_eq(a, a) & float128_eq(b, b));
  42 }
  43
  44 #endif /* FLOAT128 */