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
__unordtf2(float128 a,float128 b)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 */
45