fix a typo
[AROS.git] / arch / x86_64-all / stdc / math / e_remainderf.s
blob87910d47d0a195c027c784bfd08f60021039e0de
1 /*
2 * Based on the i387 version written by J.T. Conklin <jtc@netbsd.org>.
3 * Public domain.
4 */
6 #include "aros/x86_64/asm.h"
8 .text
9 _ALIGNMENT
10 .globl AROS_CDEFNAME(remainderf)
11 _FUNCTION(AROS_CDEFNAME(remainderf))
13 .set FirstArg, 8 /* Skip Return-Adress */
14 .set arg_x, FirstArg
16 .set SecondArg, 16 /* Skip FirstArg */
17 .set arg_y, SecondArg
19 AROS_CDEFNAME(remainderf):
20 movss %xmm0,-4(%rsp)
21 movss %xmm1,-8(%rsp)
22 flds -8(%rsp)
23 flds -4(%rsp)
24 1: fprem1
25 fstsw %ax
26 testw $0x400,%ax
27 jne 1b
28 fstps -4(%rsp)
29 movss -4(%rsp),%xmm0
30 fstp %st
31 ret