[BACK]Return to poly.S CVS log [TXT] [DIR] Up to [DVB] / dietlibc / i386
File:  [DVB] / dietlibc / i386 / poly.S
Revision 1.1: download - view: text, annotated - select for diffs
Mon Jul 30 13:59:22 2001 UTC (22 years, 10 months ago) by fefe
Branches: MAIN
CVS tags: finnland_test_200301, branch_rc14_fieldtest_finnland, branch_rc13_fieldtest_finnland, branch_rc12_fieldtest_finnland, branch_rc10_fieldtest_finnland, RELEASE_finnland_200301_1, RC12_FIELDTEST_FINNLAND, RC10_FIELDTEST_FINNLAND, HEAD
more math


.text
.global __poly
.type	__poly,@function


#
#  double  __poly ( double x, int n, const double* c );
#

__poly:
	movl 	16(%esp),%eax		
	movl	12(%esp),%ecx		 
	leal 	(%eax,%ecx,8),%eax
	fldl	 4(%esp)
	fldz
.Lloop:
	fmul 	%st(1),%st(0)
	faddl	(%eax)
	addl 	$-8,%eax
	decl	%ecx
	jns 	.Lloop
	fstp 	%st(1)
	ret
LinuxTV legacy CVS <linuxtv.org/cvs>