NetBSD/lib/libm/arch/mc68881/e_scalb.S

/*	$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
G/c label orphaned since rev. 1.6. 2000-01-31 21:28:49 +03:00			`/* $NetBSD: e_scalb.S,v 1.8 2000/01/31 18:28:49 kleink Exp $ */`
Add register prefixes. 1999-11-10 19:45:33 +03:00
68881-assisted versions of these functions. 1995-02-18 04:24:42 +03:00			`/*`
Winning Strategies has placed this code in the public domain. 1995-05-12 03:03:44 +04:00			`* Written by J.T. Conklin <jtc@netbsd.org>.`
			`* Public domain.`
68881-assisted versions of these functions. 1995-02-18 04:24:42 +03:00			`*/`

			`#include <machine/asm.h>`

G/c label orphaned since rev. 1.6. 2000-01-31 21:28:49 +03:00			`RCSID("$NetBSD: e_scalb.S,v 1.8 2000/01/31 18:28:49 kleink Exp $")`
68881-assisted versions of these functions. 1995-02-18 04:24:42 +03:00
			`ENTRY(__ieee754_scalb)`
Add register prefixes. 1999-11-10 19:45:33 +03:00			`fmoved %sp@(4),%fp0`
			`fscaled %sp@(12),%fp0`
Make these SVR4 ABI ready. 1999-08-15 22:45:18 +04:00			`#ifndef __SVR4_ABI__`
Add register prefixes. 1999-11-10 19:45:33 +03:00			`fmoved %fp0,%sp@-`
			`movel %sp@+,%d0`
			`movel %sp@+,%d1`
Make these SVR4 ABI ready. 1999-08-15 22:45:18 +04:00			`#endif`
68881-assisted versions of these functions. 1995-02-18 04:24:42 +03:00			`rts`