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]
18 *
19 * CDDL HEADER END
20 */
21 /*
22 * Copyright 2011 Nexenta Systems, Inc. All rights reserved.
23 */
24 /*
25 * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
26 * Use is subject to license terms.
27 */
28
29 .file "floor.s"
30
31 #include "libm.h"
32 LIBM_ANSI_PRAGMA_WEAK(floor,function)
33 #include "libm_synonyms.h"
34
35 ENTRY(floor)
36 subl $8,%esp
37 fstcw (%esp)
38 fldl 12(%esp)
39 movw (%esp),%cx
40 orw $0x0c00,%cx
41 xorw $0x0800,%cx
42 movw %cx,4(%esp)
43 fldcw 4(%esp) / set RD = down
44 frndint
45 fstcw 4(%esp) / restore RD
46 movw 4(%esp),%dx
47 andw $0xf3ff,%dx
48 movw (%esp),%cx
49 andw $0x0c00,%cx
50 orw %dx,%cx
51 movw %cx,(%esp)
52 fldcw (%esp) / restore RD
53 addl $8,%esp
|
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]
18 *
19 * CDDL HEADER END
20 */
21 /*
22 * Copyright 2011 Nexenta Systems, Inc. All rights reserved.
23 */
24 /*
25 * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
26 * Use is subject to license terms.
27 */
28
29 .file "floor.s"
30
31 #include "libm.h"
32 LIBM_ANSI_PRAGMA_WEAK(floor,function)
33
34 ENTRY(floor)
35 subl $8,%esp
36 fstcw (%esp)
37 fldl 12(%esp)
38 movw (%esp),%cx
39 orw $0x0c00,%cx
40 xorw $0x0800,%cx
41 movw %cx,4(%esp)
42 fldcw 4(%esp) / set RD = down
43 frndint
44 fstcw 4(%esp) / restore RD
45 movw 4(%esp),%dx
46 andw $0xf3ff,%dx
47 movw (%esp),%cx
48 andw $0x0c00,%cx
49 orw %dx,%cx
50 movw %cx,(%esp)
51 fldcw (%esp) / restore RD
52 addl $8,%esp
|