1/* 2 * Based on the i387 version written by J.T. Conklin <jtc@netbsd.org>. 3 * Public domain. 4 */ 5 6#include <machine/asm.h> 7 8RCSID("from: $NetBSD: e_remainderf.S,v 1.2 1995/05/08 23:49:47 jtc Exp $") 9ENTRY(remainderf) 10 movss %xmm0,-4(%rsp) 11 movss %xmm1,-8(%rsp) 12 flds -8(%rsp) 13 flds -4(%rsp) 141: fprem1 15 fstsw %ax 16 testw $0x400,%ax 17 jne 1b 18 fstps -4(%rsp) 19 movss -4(%rsp),%xmm0 20 fstp %st 21 ret 22END(remainderf) 23 24 .section .note.GNU-stack,"",%progbits 25