1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
/* * Written by J.T. Conklin <jtc@netbsd.org>. * Public domain. * * Adapted for `long double' by Ulrich Drepper <drepper@cygnus.com>. */ #include <machine/asm.h> RCSID("$NetBSD: $") ENTRY(__ieee754_fmodl) fldt 16(%esp) fldt 4(%esp) 1: fprem fstsw %ax sahf jp 1b fstp %st(1) ret END (__ieee754_fmodl)