Patrick Welche <prlw1@cam.ac.uk>
[netbsd-mini2440.git] / lib / libm / arch / i387 / lrint.S
blobeabb34686bc4431874f2a7b47655364b9dc4420e
1 /* $NetBSD: lrint.S,v 1.1 2004/07/01 17:30:48 drochner Exp $ */
3 /*
4  * Written by Matthias Drochner <drochner@NetBSD.org>.
5  * Public domain.
6  */
8 #include <machine/asm.h>
10 ENTRY(lrint)
11 #ifdef __i386__
12         pushl   %ebp
13         movl    %esp,%ebp
14         subl    $4,%esp
15         fldl    8(%ebp)
16         fistpl  (%esp)
17         movl    (%esp),%eax
18         leave
19         ret
20 #else
21         cvtsd2siq %xmm0,%rax
22         ret
23 #endif