mirror of
https://github.com/reactos/reactos.git
synced 2025-05-01 19:50:36 +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
|