Home | History | Annotate | Line # | Download | only in i387
s_scalbn.S revision 1.7.6.1
      1      1.1   jtc /*
      2      1.7  salo  * Written by J.T. Conklin <jtc (at) NetBSD.org>.
      3      1.3   jtc  * Public domain.
      4      1.1   jtc  */
      5      1.1   jtc 
      6      1.1   jtc #include <machine/asm.h>
      7      1.1   jtc 
      8  1.7.6.1  tron RCSID("$NetBSD: s_scalbn.S,v 1.7.6.1 2006/04/04 21:33:38 tron Exp $")
      9      1.2   jtc 
     10      1.1   jtc ENTRY(scalbn)
     11  1.7.6.1  tron #ifdef __x86_64__
     12  1.7.6.1  tron 	movl %edi,-12(%rsp)
     13  1.7.6.1  tron 	fildl -12(%rsp)
     14  1.7.6.1  tron 	movsd %xmm0,-8(%rsp)
     15  1.7.6.1  tron 	fldl -8(%rsp)
     16  1.7.6.1  tron 	fscale
     17  1.7.6.1  tron 	fstpl -8(%rsp)
     18  1.7.6.1  tron 	movsd -8(%rsp),%xmm0
     19  1.7.6.1  tron 	fstp %st(0)
     20  1.7.6.1  tron #else
     21  1.7.6.1  tron 	fildl 12(%esp)
     22  1.7.6.1  tron 	fldl 4(%esp)
     23      1.1   jtc 	fscale
     24  1.7.6.1  tron 	fstp %st(1)		/* clean up stack */
     25  1.7.6.1  tron #endif
     26      1.1   jtc 	ret
     27