kolibrios-fun/programs/develop/libraries/newlib/math/scalbn.S
Sergey Semyonov (Serge) 2336060a0c newlib: update
git-svn-id: svn://kolibrios.org@1906 a494cfbc-eb01-0410-851d-a64ba20cac60
2011-03-11 18:52:24 +00:00

20 lines
285 B
ArmAsm

/*
* Written by J.T. Conklin <jtc@netbsd.org>.
* Public domain.
*/
.file "scalbn.S"
.text
.align 4
.globl _scalbn
.def _scalbn; .scl 2; .type 32; .endef
_scalbn:
fildl 12(%esp)
fldl 4(%esp)
fscale
fstp %st(1)
ret
.globl _scalbln
.set _scalbln,_scalbn