1! .ident	"%Z%%M%	%I%	%E% SMI"
2!
3! Copyright 2005 Sun Microsystems, Inc.  All rights reserved.
4! Use is subject to license terms.
5!
6! CDDL HEADER START
7!
8! The contents of this file are subject to the terms of the
9! Common Development and Distribution License, Version 1.0 only
10! (the "License").  You may not use this file except in compliance
11! with the License.
12!
13! You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
14! or http://www.opensolaris.org/os/licensing.
15! See the License for the specific language governing permissions
16! and limitations under the License.
17!
18! When distributing Covered Code, include this CDDL HEADER in each
19! file and include the License file at usr/src/OPENSOLARIS.LICENSE.
20! If applicable, add the following below this CDDL HEADER, with the
21! fields enclosed by brackets "[]" replaced with your own identifying
22! information: Portions Copyright [yyyy] [name of copyright owner]
23!
24! CDDL HEADER END
25!
26
27	.inline	__mul_set,3
28	std	%o0,[%sp+0x48]		! save x
29	ldd	[%sp+0x48],%f0
30	std	%o2,[%sp+0x50]		! save y
31	ldd	[%sp+0x50],%f2
32	.volatile
33	fmuld	%f0,%f2,%f0		! compute result and leave it for return
34	st	%fsr,[%sp+0x44]
35	.nonvolatile
36	ld	[%sp+0x44],%o0
37	and	%o0,1,%o0
38	st	%o0,[%o4]		! store eround
39	.end
40
41	.inline	__div_set,3
42	std	%o0,[%sp+0x48]		! save x
43	ldd	[%sp+0x48],%f0
44	std	%o2,[%sp+0x50]		! save y
45	ldd	[%sp+0x50],%f2
46	.volatile
47	fdivd	%f0,%f2,%f0		! compute result and leave it for return
48	st	%fsr,[%sp+0x44]
49	.nonvolatile
50	ld	[%sp+0x44],%o0
51	and	%o0,1,%o0
52	st	%o0,[%o4]		! store eround
53	.end
54
55        .inline __dabs,2
56	ld	[%o0],%f0
57	ld	[%o0+4],%f1
58	fabss	%f0,%f0
59        .end
60
61	.inline	__get_ieee_flags,1
62	.volatile
63	st	%fsr,[%o0]
64	st	%g0,[%sp+0x44]
65	ld	[%sp+0x44],%fsr
66	.nonvolatile
67	.end
68
69	.inline	__set_ieee_flags,1
70	ld	[%o0],%fsr
71	.end
72