1
0
kolibrios/programs/develop/open watcom/trunk/clib/math/cosf.asm
Sergey Semyonov (Serge) 54786d007d Clib create_file, read_file, write_file: watcom-specific implementation
git-svn-id: svn://kolibrios.org@711 a494cfbc-eb01-0410-851d-a64ba20cac60
2008-02-05 06:08:42 +00:00

30 lines
476 B
NASM

include mdef.inc
modstart cosf
xdefp _cosf
_cosf proc
fcos
fnstsw ax
test eax, 0x400
jnz L1
ret
L1: fldpi
fadd st,st
fxch st(1)
L2:
fprem1
fnstsw ax
test eax,0x400
jnz L2
fstp st(1)
fcos
ret
_cosf endp
endmod
end