X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2Fx86_64%2Flog1pl.s;fp=src%2Fmath%2Fx86_64%2Flog1pl.s;h=955c9dbff0c37cde4c924aae54f0ad0d8954e207;hb=30df206cb0c66848142898115d301a0d80333d0f;hp=0000000000000000000000000000000000000000;hpb=80949ccdc6656c51292b4260b6e8d7b493ca6c45;p=musl

diff --git a/src/math/x86_64/log1pl.s b/src/math/x86_64/log1pl.s
new file mode 100644
index 00000000..955c9dbf
--- /dev/null
+++ b/src/math/x86_64/log1pl.s
@@ -0,0 +1,15 @@
+.global log1pl
+.type log1pl,@function
+log1pl:
+	mov 14(%rsp),%eax
+	fldln2
+	and $0x7fffffff,%eax
+	fldt 8(%rsp)
+	cmp $0x3ffd9400,%eax
+	ja 1f
+	fyl2xp1
+	ret
+1:	fld1
+	faddp
+	fyl2x
+	ret