1 1.1.4.2 minoura /* $NetBSD: gtdf2.c,v 1.1.4.2 2000/06/23 16:17:58 minoura Exp $ */ 2 1.1.4.2 minoura 3 1.1.4.2 minoura /* 4 1.1.4.2 minoura * Written by Ben Harris, 2000. This file is in the Public Domain. 5 1.1.4.2 minoura */ 6 1.1.4.2 minoura 7 1.1.4.2 minoura #include "softfloat-for-gcc.h" 8 1.1.4.2 minoura #include "milieu.h" 9 1.1.4.2 minoura #include "softfloat.h" 10 1.1.4.2 minoura 11 1.1.4.2 minoura #include <sys/cdefs.h> 12 1.1.4.2 minoura #if defined(LIBC_SCCS) && !defined(lint) 13 1.1.4.2 minoura __RCSID("$NetBSD: gtdf2.c,v 1.1.4.2 2000/06/23 16:17:58 minoura Exp $"); 14 1.1.4.2 minoura #endif /* LIBC_SCCS and not lint */ 15 1.1.4.2 minoura 16 1.1.4.2 minoura flag __gtdf2(float64, float64); 17 1.1.4.2 minoura 18 1.1.4.2 minoura flag 19 1.1.4.2 minoura __gtdf2(float64 a, float64 b) 20 1.1.4.2 minoura { 21 1.1.4.2 minoura 22 1.1.4.2 minoura /* libgcc1.c says a > b */ 23 1.1.4.2 minoura return float64_lt(b, a); 24 1.1.4.2 minoura } 25