From 1d9a4b73a37c6e942f909c2d42ca13b5c47e8362 Mon Sep 17 00:00:00 2001 From: Mystery Man Date: Tue, 5 Apr 2005 19:41:54 +0000 Subject: This commit was manufactured by cvs2svn to create tag 'V10_2_20mdk'. --- mdk-stage1/dietlibc/i386/expm1.S | 23 ----------------------- 1 file changed, 23 deletions(-) delete mode 100644 mdk-stage1/dietlibc/i386/expm1.S (limited to 'mdk-stage1/dietlibc/i386/expm1.S') diff --git a/mdk-stage1/dietlibc/i386/expm1.S b/mdk-stage1/dietlibc/i386/expm1.S deleted file mode 100644 index 677f4723f..000000000 --- a/mdk-stage1/dietlibc/i386/expm1.S +++ /dev/null @@ -1,23 +0,0 @@ -.text -.type expm1,@function -.global expm1 -expm1: # note: exp(x) = 2^(x*log2(e)) - fldl2e - fmull 4(%esp) # x*log2(e) - fld %st(0) # x*log2(e) x*log2(e) - frndint # int(x*log2(e)) x*log2(e) - fxch # x*log2(e) int(x*log2(e)) - fsub %st(1),%st(0) # frac(x*log2(e)) int(x*log2(e)) - f2xm1 # 2^(fract(x*log2(e)))-1 int(x*log2(e)) - fscale # 2^(x*log2(e))-2^int(x*log2(e)) int(x*log2(e)) - fxch # int(x*log2(e)) 2^(x*log2(e))-2^int(x*log2(e)) - fld1 # 1 int(x*log2(e)) 2^(x*log2(e))-2^int(x*log2(e)) - fscale # 2^int(x*log2(e)) int(x*log2(e)) 2^(x*log2(e))-2^int(x*log2(e)) - fstp %st(1) # 2^int(x*log2(e)) 2^(x*log2(e))-2^int(x*log2(e)) - fld1 # 1 2^int(x*log2(e)) 2^(x*log2(e))-2^int(x*log2(e)) - fsubrp %st(1) # 2^int(x*log2(e))-1 2^(x*log2(e))-2^int(x*log2(e)) - faddp %st(1) - ret - -.ende: -.size expm1,.ende-expm1 -- cgit v1.2.1