--- /dev/null
+/* $NetBSD: unordtf2.c,v 1.2 2014/01/30 19:11:41 matt Exp $ */\r
+/** @file\r
+*\r
+* Copyright (c) 2013 - 2014, ARM Limited. All rights reserved.\r
+*\r
+* This program and the accompanying materials\r
+* are licensed and made available under the terms and conditions of the BSD License\r
+* which accompanies this distribution. The full text of the license may be found at\r
+* http://opensource.org/licenses/bsd-license.php\r
+*\r
+* THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS" BASIS,\r
+* WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED.\r
+*\r
+**/\r
+/*\r
+ * Written by Richard Earnshaw, 2003. This file is in the Public Domain.\r
+ */\r
+\r
+#include "softfloat-for-gcc.h"\r
+#include "milieu.h"\r
+#include "softfloat.h"\r
+\r
+#include <sys/cdefs.h>\r
+#if defined(LIBC_SCCS) && !defined(lint)\r
+__RCSID("$NetBSD: unordtf2.c,v 1.2 2014/01/30 19:11:41 matt Exp $");\r
+#endif /* LIBC_SCCS and not lint */\r
+\r
+#ifdef FLOAT128\r
+\r
+flag __unordtf2(float128, float128);\r
+\r
+flag\r
+__unordtf2(float128 a, float128 b)\r
+{\r
+ /*\r
+ * The comparison is unordered if either input is a NaN.\r
+ * Test for this by comparing each operand with itself.\r
+ * We must perform both comparisons to correctly check for\r
+ * signalling NaNs.\r
+ */\r
+ return 1 ^ (float128_eq(a, a) & float128_eq(b, b));\r
+}\r
+\r
+#endif /* FLOAT128 */\r