Head

GCC Code Coverage Report

Directory:	./		Exec	Total	Coverage
File:	lib/libm/src/polevll.c	Lines:	13	13	100.0 %
Date:	2017-11-07	Branches:	4	4	100.0 %


/*	$OpenBSD: polevll.c,v 1.2 2013/11/12 20:35:09 martynas Exp $	*/

/*
 * Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

/*							polevll.c
 *							p1evll.c
 *
 *	Evaluate polynomial
 *
 *
 *
 * SYNOPSIS:
 *
 * int N;
 * long double x, y, coef[N+1], polevl[];
 *
 * y = polevll( x, coef, N );
 *
 *
 *
 * DESCRIPTION:
 *
 * Evaluates polynomial of degree N:
 *
 *                     2          N
 * y  =  C  + C x + C x  +...+ C x
 *        0    1     2          N
 *
 * Coefficients are stored in reverse order:
 *
 * coef[0] = C  , ..., coef[N] = C  .
 *            N                   0
 *
 *  The function p1evll() assumes that coef[N] = 1.0 and is
 * omitted from the array.  Its calling arguments are
 * otherwise the same as polevll().
 *
 *
 * SPEED:
 *
 * In the interest of speed, there are no checks for out
 * of bounds arithmetic.  This routine is used by most of
 * the functions in the library.  Depending on available
 * equipment features, the user may wish to rewrite the
 * program in microcode or assembly language.
 *
 */

#include <math.h>

#include "math_private.h"

/*
 * Polynomial evaluator:
 *  P[0] x^n  +  P[1] x^(n-1)  +  ...  +  P[n]
 */
long double
__polevll(long double x, void *PP, int n)
{
	long double y;
	long double *P;

	P = (long double *)PP;
	y = *P++;
	do {
		y = y * x + *P++;
	} while (--n);

	return (y);
}

/*
 * Polynomial evaluator:
 *  x^n  +  P[0] x^(n-1)  +  P[1] x^(n-2)  +  ...  +  P[n]
 */
long double
__p1evll(long double x, void *PP, int n)
{
	long double y;
	long double *P;

	P = (long double *)PP;
	n -= 1;
	y = x + *P++;
	do {
		y = y * x + *P++;
	} while (--n);

	return (y);
}


Generated by: GCOVR (Version 3.3)

Line	Branch	Exec	Source
1			/* $OpenBSD: polevll.c,v 1.2 2013/11/12 20:35:09 martynas Exp $ */
2
3			/*
4			* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
5			*
6			* Permission to use, copy, modify, and distribute this software for any
7			* purpose with or without fee is hereby granted, provided that the above
8			* copyright notice and this permission notice appear in all copies.
9			*
10			* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11			* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12			* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13			* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14			* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15			* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16			* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17			*/
18
19			/* polevll.c
20			* p1evll.c
21			*
22			* Evaluate polynomial
23			*
24			*
25			*
26			* SYNOPSIS:
27			*
28			* int N;
29			* long double x, y, coef[N+1], polevl[];
30			*
31			* y = polevll( x, coef, N );
32			*
33			*
34			*
35			* DESCRIPTION:
36			*
37			* Evaluates polynomial of degree N:
38			*
39			* 2 N
40			* y = C + C x + C x +...+ C x
41			* 0 1 2 N
42			*
43			* Coefficients are stored in reverse order:
44			*
45			* coef[0] = C , ..., coef[N] = C .
46			* N 0
47			*
48			* The function p1evll() assumes that coef[N] = 1.0 and is
49			* omitted from the array. Its calling arguments are
50			* otherwise the same as polevll().
51			*
52			*
53			* SPEED:
54			*
55			* In the interest of speed, there are no checks for out
56			* of bounds arithmetic. This routine is used by most of
57			* the functions in the library. Depending on available
58			* equipment features, the user may wish to rewrite the
59			* program in microcode or assembly language.
60			*
61			*/
62
63			#include <math.h>
64
65			#include "math_private.h"
66
67			/*
68			* Polynomial evaluator:
69			* P[0] x^n + P[1] x^(n-1) + ... + P[n]
70			*/
71			long double
72			__polevll(long double x, void *PP, int n)
73			{
74			long double y;
75			long double *P;
76
77		10	P = (long double *)PP;
78		5	y = *P++;
79		5	do {
80		30	y = y * x + *P++;
81	✓✓	30	} while (--n);
82
83		5	return (y);
84			}
85
86			/*
87			* Polynomial evaluator:
88			* x^n + P[0] x^(n-1) + P[1] x^(n-2) + ... + P[n]
89			*/
90			long double
91			__p1evll(long double x, void *PP, int n)
92			{
93			long double y;
94			long double *P;
95
96		10	P = (long double *)PP;
97		5	n -= 1;
98		5	y = x + *P++;
99		5	do {
100		25	y = y * x + *P++;
101	✓✓	25	} while (--n);
102
103		5	return (y);
104			}