s_ceilf.S revision 1.1 
1/*
2 * Written by J.T. Conklin <jtc@netbsd.org>.
3 * Public domain.
4 */
5
6#include <machine/asm.h>
7
8RCSID("$NetBSD: s_ceilf.S,v 1.3 1995/05/08 23:52:44 jtc Exp $")
9
10ENTRY(ceilf)
11	pushl	%ebp
12	movl	%esp,%ebp
13	subl	$8,%esp
14
15	fstcw	-12(%ebp)		/* store fpu control word */
16	movw	-12(%ebp),%dx
17	orw	$0x0800,%dx		/* round towards +oo */
18	andw	$0xfbff,%dx
19	movw	%dx,-16(%ebp)
20	fldcw	-16(%ebp)		/* load modfied control word */
21
22	flds	8(%ebp);		/* round */
23	frndint
24
25	fldcw	-12(%ebp)		/* restore original control word */
26
27	leave
28	ret
29