Subversion Repositories Kolibri OS

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
4973 right-hear 1 
#include
2 
MK_C_SYM(tan)
3 
	fldl	4(%esp)
4 
	fptan
5 
	fnstsw	%ax
6 
	andw	$0x400,%ax
7 
	jnz	1f
8 
	fstp	%st(0)
9 
	ret
10 
1:	fldpi
11 
	fadd	%st(0)
12 
	fxch	%st(1)
13 
2:	fprem1
14 
	fstsw	%ax
15 
	andw	$0x400,%ax
16 
	jnz	2b
17 
	fstp	%st(1)
18 
	fptan
19 
	fstp	%st(0)
20 
	ret