X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;ds=sidebyside;f=src%2Fmath%2Fx86_64%2Fremainderl.s;fp=src%2Fmath%2Fx86_64%2Fremainderl.s;h=75c123744621fd00d3acec785d44b4ebdfcbebd8;hb=b935147761d1770bb115f09f8c28ddb4d36e1236;hp=0000000000000000000000000000000000000000;hpb=8d9e948652eb8381f1f376cbd0c9bc5e2947d150;p=musl

diff --git a/src/math/x86_64/remainderl.s b/src/math/x86_64/remainderl.s
new file mode 100644
index 00000000..75c12374
--- /dev/null
+++ b/src/math/x86_64/remainderl.s
@@ -0,0 +1,11 @@
+.global remainderl
+.type remainderl,@function
+remainderl:
+	fldt 24(%rsp)
+	fldt 8(%rsp)
+1:	fprem1
+	fstsw %ax
+	sahf
+	jp 1b
+	fstp %st(1)
+	ret