File:  [MW Coherent from dump] / coherent / b / lib / libm / i387 / tan87.s
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Wed May 29 04:56:35 2019 UTC (7 years ago) by root
Branches: MarkWilliams, MAIN
CVS tags: relic, HEAD
coherent

//////////
/ /usr/src/libm/i387/tan87.s
/ i387 mathematics library
/ tan(d)
//////////

RASIZE	=	4

	.globl	tan

//////////
/ double
/ tan(angle)
/ double angle;
//////////

d	=	RASIZE		/ arg offset

tan:
	fldl	d(%esp)		/ Load argument d.
	fptan			/ tan(d) in %st1, 1.0 in %st
	fstp	%st		/ tan(d)
	ret

/ end of tan87.s

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.