From 51e59281644fd7b99f9ff70af6761b7f5b2b2419 Mon Sep 17 00:00:00 2001 From: Andreas Jaeger Date: Tue, 18 Sep 2001 14:13:20 +0000 Subject: Update. 2001-09-18 Andreas Jaeger * sysdeps/i386/fpu/s_logbl.S: Move to ... * sysdeps/i386/fpu/s_logbl.c: ...here, use inline assembler. * sysdeps/i386/fpu/s_rintl.S: Move to ... * sysdeps/i386/fpu/s_rintl.c: ...here, use inline assembler. * sysdeps/i386/fpu/s_significandl.S: Move to ... * sysdeps/i386/fpu/s_significandl.c: ...here, use inline assembler. --- sysdeps/i386/fpu/s_logbl.c | 19 +++++++++++++++++++ sysdeps/i386/fpu/s_rintl.c | 18 ++++++++++++++++++ sysdeps/i386/fpu/s_significandl.c | 19 +++++++++++++++++++ 3 files changed, 56 insertions(+) create mode 100644 sysdeps/i386/fpu/s_logbl.c create mode 100644 sysdeps/i386/fpu/s_rintl.c create mode 100644 sysdeps/i386/fpu/s_significandl.c (limited to 'sysdeps/i386/fpu') diff --git a/sysdeps/i386/fpu/s_logbl.c b/sysdeps/i386/fpu/s_logbl.c new file mode 100644 index 0000000000..391e2db489 --- /dev/null +++ b/sysdeps/i386/fpu/s_logbl.c @@ -0,0 +1,19 @@ +/* + * Written by J.T. Conklin . + * Changes for long double by Ulrich Drepper + * Public domain. + */ + +#include + +long double +__logbl (long double x) +{ + long double res; + + asm ("fxtract\n" + "fstp %%st" : "=t" (res) : "0" (x)); + return res; +} + +weak_alias (__logbl, logbl) diff --git a/sysdeps/i386/fpu/s_rintl.c b/sysdeps/i386/fpu/s_rintl.c new file mode 100644 index 0000000000..66af9cb675 --- /dev/null +++ b/sysdeps/i386/fpu/s_rintl.c @@ -0,0 +1,18 @@ +/* + * Written by J.T. Conklin . + * Changes for long double by Ulrich Drepper + * Public domain. + */ + +#include + +long double +__rintl (long double x) +{ + long double res; + + asm ("frndint" : "=t" (res) : "0" (x)); + return res; +} + +weak_alias (__rintl, rintl) diff --git a/sysdeps/i386/fpu/s_significandl.c b/sysdeps/i386/fpu/s_significandl.c new file mode 100644 index 0000000000..f31b77abbe --- /dev/null +++ b/sysdeps/i386/fpu/s_significandl.c @@ -0,0 +1,19 @@ +/* + * Written by J.T. Conklin . + * Changes for long double by Ulrich Drepper + * Public domain. + */ + +#include + +long double +__significandl (long double x) +{ + long double res; + + asm ("fxtract\n" + "fstp %%st(0)" : "=t" (res) : "0" (x)); + return res; +} + +weak_alias (__significandl, significandl) -- cgit v1.2.3