kolibrios/contrib/kolibri-libc/source/math/tan.s

17 lines
268 B
ArmAsm
Raw Normal View History

/* Copyright (C) 1994 DJ Delorie, see COPYING.DJ for details */
#include "libc/asm.h"
L0:
.quad 0xffffffffffffffff
MK_C_SYM(tan)
fldl 4(%esp)
fptan
fstsw
fstp %st(0)
sahf
jnp L1
/* fstp %st(0) - if exception, there is nothing on the stack */
fldl L0
L1:
ret