1 | /* |
---|---|
2 | * Written by J.T. Conklin <jtc@netbsd.org>. |
3 | * Public domain. |
4 | * |
5 | * Adapted for `long double' by Ulrich Drepper <drepper@cygnus.com>. |
6 | * Adapted for x86-64 by Andreas Jaeger <aj@suse.de>. |
7 | */ |
8 | |
9 | #include <machine/asm.h> |
10 | |
11 | RCSID("$NetBSD: $") |
12 | |
13 | ENTRY(__ieee754_fmodl) |
14 | fldt 24(%rsp) |
15 | fldt 8(%rsp) |
16 | 1: fprem |
17 | fstsw %ax |
18 | and $04,%ah |
19 | jnz 1b |
20 | fstp %st(1) |
21 | ret |
22 | END (__ieee754_fmodl) |
23 | strong_alias (__ieee754_fmodl, __fmodl_finite) |
24 |