1/* 2 * Written by J.T. Conklin <jtc@netbsd.org>. 3 * Public domain. 4 */ 5 6#include <machine/asm.h> 7 8__FBSDID("$FreeBSD$"); 9/* RCSID("$NetBSD: s_scalbnf.S,v 1.4 1999/01/02 05:15:40 kristerw Exp $") */ 10 11ENTRY(scalbnf) 12 fildl 8(%esp) 13 flds 4(%esp) 14 fscale 15 fstp %st(1) /* bug fix for fp stack overflow */ 16 ret 17END(scalbnf) 18 19.globl CNAME(ldexpf) 20.set CNAME(ldexpf),CNAME(scalbnf) 21 22 .section .note.GNU-stack,"",%progbits 23