fpsetsticky.S revision 1.3 
1/* $OpenBSD: fpsetsticky.S,v 1.3 2005/08/07 11:30:38 espie Exp $ */
2/*
3 * Written by Charles M. Hannum, Apr 9, 1995
4 * Public domain.
5 */
6
7#include <machine/asm.h>
8
9ENTRY(fpsetsticky)
10	subl $28,%esp
11
12	fnstenv (%esp)
13	movl 4(%esp),%eax
14	movl %eax,%edx
15
16	andl $63,%eax
17
18	subl %eax,%edx
19	movl 32(%esp),%ecx
20	andl $63,%ecx
21	addl %ecx,%edx
22	movl %edx,4(%esp)
23	fldenv (%esp)
24
25	addl $28,%esp
26	ret
27