NetBSD/lib/libm/arch/mc68881/e_scalb.S
2000-01-31 18:28:49 +00:00

21 lines
383 B
ArmAsm

/* $NetBSD: e_scalb.S,v 1.8 2000/01/31 18:28:49 kleink Exp $ */
/*
* Written by J.T. Conklin <jtc@netbsd.org>.
* Public domain.
*/
#include <machine/asm.h>
RCSID("$NetBSD: e_scalb.S,v 1.8 2000/01/31 18:28:49 kleink Exp $")
ENTRY(__ieee754_scalb)
fmoved %sp@(4),%fp0
fscaled %sp@(12),%fp0
#ifndef __SVR4_ABI__
fmoved %fp0,%sp@-
movel %sp@+,%d0
movel %sp@+,%d1
#endif
rts