xref: /netbsd-src/lib/libm/arch/alpha/lrint.S (revision 276edc129d198a79e89cfd07539d58eb35a5f1b4)
1/* $NetBSD: lrint.S,v 1.4 2021/07/06 12:38:40 thorpej Exp $ */
2
3/*
4 * Written by Matthias Drochner <drochner@NetBSD.org>.
5 * Public domain.
6 */
7
8#include <machine/asm.h>
9
10LEAF(lrint, 1)
11	cvttq fa0,ft0
12#if 0
13	ftoit ft0,v0
14#else
15	lda sp,-16(sp)
16	stt ft0,0(sp)
17	ldq v0,0(sp)
18	lda sp,16(sp)
19#endif
20	ret
21END(lrint)
22