s_scalbn.S revision 2116
1140195Sdas/*
2140195Sdas * Copyright (c) 1994 Winning Strategies, Inc.
3140195Sdas * All rights reserved.
4140195Sdas *
5140195Sdas * Redistribution and use in source and binary forms, with or without
6140195Sdas * modification, are permitted provided that the following conditions
7140195Sdas * are met:
8140195Sdas * 1. Redistributions of source code must retain the above copyright
9140195Sdas *    notice, this list of conditions and the following disclaimer.
10140195Sdas * 2. Redistributions in binary form must reproduce the above copyright
11140195Sdas *    notice, this list of conditions and the following disclaimer in the
12140195Sdas *    documentation and/or other materials provided with the distribution.
13140195Sdas * 3. All advertising materials mentioning features or use of this software
14140195Sdas *    must display the following acknowledgement:
15140195Sdas *      This product includes software developed by Winning Strategies, Inc.
16140195Sdas * 4. The name of the author may not be used to endorse or promote products
17140195Sdas *    derived from this software without specific prior written permission.
18140195Sdas *
19140195Sdas * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20192760Sattilio * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 */
30
31/*
32 * Written by:
33 *	J.T. Conklin (jtc@wimsey.com), Winning Strategies, Inc.
34 */
35
36#include <machine/asm.h>
37
38RCSID("$Id: s_scalbn.S,v 1.2 1994/03/12 01:30:46 jtc Exp $")
39
40ENTRY(scalbn)
41	fildl	12(%esp)
42	fldl	4(%esp)
43	fscale
44	ret
45