mirror of
https://github.com/reactos/reactos.git
synced 2024-08-01 17:11:35 +00:00
27 lines
318 B
ArmAsm
27 lines
318 B
ArmAsm
|
|
#include <asm.inc>
|
|
|
|
PUBLIC _fmod
|
|
|
|
/* FUNCTIONS ***************************************************************/
|
|
.code
|
|
|
|
_fmod:
|
|
push ebp
|
|
mov ebp, esp
|
|
|
|
fld qword ptr [ebp + 8]
|
|
fld qword ptr [ebp + 16]
|
|
fxch st(1)
|
|
l1:
|
|
fprem
|
|
fstsw ax
|
|
sahf
|
|
jp l1
|
|
fstp st(1)
|
|
|
|
pop ebp
|
|
ret
|
|
|
|
END
|