11.1Sjtc/*
21.7Ssalo * Written by J.T. Conklin <jtc@NetBSD.org>.
31.3Sjtc * Public domain.
41.1Sjtc */
51.1Sjtc
61.1Sjtc#include <machine/asm.h>
71.1Sjtc
81.6Sfvdl#include "abi.h"
91.6Sfvdl
101.7SsaloRCSID("$NetBSD: e_scalb.S,v 1.7 2003/07/26 19:25:00 salo Exp $")
111.2Sjtc
121.1SjtcENTRY(__ieee754_scalb)
131.6Sfvdl	XMM_TWO_ARG_DOUBLE_PROLOGUE
141.6Sfvdl	fldl	ARG_DOUBLE_TWO
151.6Sfvdl	fldl	ARG_DOUBLE_ONE
161.1Sjtc	fscale
171.5Skristerw	fstp	%st(1)			/* bug fix for fp stack overflow */
181.6Sfvdl	XMM_DOUBLE_EPILOGUE
191.1Sjtc	ret
20