summaryrefslogtreecommitdiffstats
path: root/libc-top-half/musl/src/math/i386/scalbnf.s
diff options
context:
space:
mode:
Diffstat (limited to 'libc-top-half/musl/src/math/i386/scalbnf.s')
-rw-r--r--libc-top-half/musl/src/math/i386/scalbnf.s32
1 files changed, 32 insertions, 0 deletions
diff --git a/libc-top-half/musl/src/math/i386/scalbnf.s b/libc-top-half/musl/src/math/i386/scalbnf.s
new file mode 100644
index 0000000..9cb9ef5
--- /dev/null
+++ b/libc-top-half/musl/src/math/i386/scalbnf.s
@@ -0,0 +1,32 @@
+.global ldexpf
+.type ldexpf,@function
+ldexpf:
+ nop
+
+.global scalblnf
+.type scalblnf,@function
+scalblnf:
+ nop
+
+.global scalbnf
+.type scalbnf,@function
+scalbnf:
+ mov 8(%esp),%eax
+ add $0x3fe,%eax
+ cmp $0x7fd,%eax
+ jb 1f
+ sub $0x3fe,%eax
+ sar $31,%eax
+ xor $0x1ff,%eax
+ add $0x3fe,%eax
+1: inc %eax
+ shl $20,%eax
+ flds 4(%esp)
+ mov %eax,8(%esp)
+ xor %eax,%eax
+ mov %eax,4(%esp)
+ fldl 4(%esp)
+ fmulp
+ fstps 4(%esp)
+ flds 4(%esp)
+ ret