summaryrefslogtreecommitdiffstats
path: root/mdk-stage1/dietlibc/i386/poly.S
blob: d8be7d7f5e799011a7b8a5da398b57f9b6af3313 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

.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