xref: /freebsd/lib/msun/amd64/s_scalbnl.S (revision 1d386b48) 
1/*
2 * Based on code written by J.T. Conklin <jtc@netbsd.org>.
3 * Public domain.
4 */
5
6#include <machine/asm.h>
7/* RCSID("$NetBSD: s_scalbnf.S,v 1.4 1999/01/02 05:15:40 kristerw Exp $") */
8
9ENTRY(scalbnl)
10	movl	%edi,-4(%rsp)
11	fildl	-4(%rsp)
12	fldt	8(%rsp)
13	fscale
14	fstp	%st(1)
15	ret
16END(scalbnl)
17
18.globl	CNAME(ldexpl)
19.set	CNAME(ldexpl),CNAME(scalbnl)
20
21	.section .note.GNU-stack,"",%progbits
22