Home | History | Annotate | Line # | Download | only in i387
s_scalbnl.S revision 1.1 
      1  1.1  joerg /*
      2  1.1  joerg  * Written by J.T. Conklin <jtc (at) NetBSD.org>.
      3  1.1  joerg  * Public domain.
      4  1.1  joerg  */
      5  1.1  joerg 
      6  1.1  joerg #include <machine/asm.h>
      7  1.1  joerg 
      8  1.1  joerg RCSID("$NetBSD: s_scalbnl.S,v 1.1 2011/07/26 17:03:23 joerg Exp $")
      9  1.1  joerg 
     10  1.1  joerg #ifdef WEAK_ALIAS
     11  1.1  joerg WEAK_ALIAS(scalbnl,_scalbnl)
     12  1.1  joerg #endif
     13  1.1  joerg 
     14  1.1  joerg ENTRY(_scalbnl)
     15  1.1  joerg #ifdef __x86_64__
     16  1.1  joerg 	movl	%edi,-4(%rsp)
     17  1.1  joerg 	fildl	-4(%rsp)
     18  1.1  joerg 	fldt	8(%rsp)
     19  1.1  joerg 	fscale
     20  1.1  joerg 	fstp	%st(1)
     21  1.1  joerg #else
     22  1.1  joerg 	fildl 16(%esp)
     23  1.1  joerg 	fldt 4(%esp)
     24  1.1  joerg 	fscale
     25  1.1  joerg 	fstp %st(1)		/* clean up stack */
     26  1.1  joerg #endif
     27  1.1  joerg 	ret
     28