xref: /freebsd/lib/msun/i387/s_scalbnl.S (revision 9235ed71993ec615fd4675e2b0e37afc1c346f48)
1cd7d05b5SDavid Schultz/*
2cd7d05b5SDavid Schultz * Written by J.T. Conklin <jtc@netbsd.org>.
3cd7d05b5SDavid Schultz * Public domain.
4cd7d05b5SDavid Schultz */
5cd7d05b5SDavid Schultz
6cd7d05b5SDavid Schultz#include <machine/asm.h>
7cd7d05b5SDavid Schultz
8cd7d05b5SDavid Schultz__FBSDID("$FreeBSD$");
9cd7d05b5SDavid Schultz/* RCSID("$NetBSD: s_scalbnf.S,v 1.4 1999/01/02 05:15:40 kristerw Exp $") */
10cd7d05b5SDavid Schultz
11cd7d05b5SDavid SchultzENTRY(scalbnl)
12cd7d05b5SDavid Schultz	fildl	16(%esp)
13cd7d05b5SDavid Schultz	fldt	4(%esp)
14cd7d05b5SDavid Schultz	fscale
15cd7d05b5SDavid Schultz	fstp	%st(1)
16cd7d05b5SDavid Schultz	ret
179235ed71SAttilio RaoEND(scalbnl)
18cd7d05b5SDavid Schultz
19cd7d05b5SDavid Schultz.globl CNAME(ldexpl)
20cd7d05b5SDavid Schultz.set	CNAME(ldexpl),CNAME(scalbnl)
21