4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
22 * Copyright 2011 Nexenta Systems, Inc. All rights reserved.
25 * Copyright 2005 Sun Microsystems, Inc. All rights reserved.
26 * Use is subject to license terms.
32 LIBM_ANSI_PRAGMA_WEAK
(fmod
,function
)
33 #include "libm_protos.h"
39 movlpd
%xmm1
,-16(%rbp
)
42 movl
-12(%rbp
),%eax
/ eax
<-- hi_32
(y
)
43 andl $
0x7fffffff,%eax
/ eax
<-- hi_32
(|y|
)
44 orl
-16(%rbp
),%eax
/ eax
<-- lo_32
(y
)|hi_32
(|y|
)
50 fprem
/ partial remainder
51 fstsw
%ax
/ store status word
52 andw $
0x400,%ax
/ check for incomplete reduction
53 jne
.loop / loop while reduction incomplete
64 call PIC_F
(_SVID_libm_err
)