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/* RCSID("$NetBSD: s_scalbnf.S,v 1.4 1999/01/02 05:15:40 kristerw Exp $") */ 8cd7d05b5SDavid Schultz 9cd7d05b5SDavid SchultzENTRY(scalbnl) 10cd7d05b5SDavid Schultz fildl 16(%esp) 11cd7d05b5SDavid Schultz fldt 4(%esp) 12cd7d05b5SDavid Schultz fscale 13cd7d05b5SDavid Schultz fstp %st(1) 14cd7d05b5SDavid Schultz ret 159235ed71SAttilio RaoEND(scalbnl) 16cd7d05b5SDavid Schultz 17cd7d05b5SDavid Schultz.globl CNAME(ldexpl) 18cd7d05b5SDavid Schultz.set CNAME(ldexpl),CNAME(scalbnl) 19*8997563cSKonstantin Belousov 20*8997563cSKonstantin Belousov .section .note.GNU-stack,"",%progbits 21