Add method to compile an evalpoly module

Author: kgryte

lib/node_modules/@stdlib/math/base/tools/evalpoly/lib/compile.js

@@ -73,18 +73,28 @@ function compile( c ) {
 	}
 	// If more than one coefficient, apply Horner's method...
 	horner = c[ 0 ].toString();
+	if ( isInteger( c[ 0 ] ) ) {
+		horner += '.0';
+	}
 	for ( i = 1; i < n; i++ ) {
-		horner += '+x*';
+		horner += ' + (x * ';
 		if ( i < m ) {
 			horner += '(';
 		}
 		horner += c[ i ].toString();
+		if ( isInteger( c[ i ] ) ) {
+			horner += '.0';
+		}
 	}
 	// Close all the parentheses...
-	for ( i = 0; i < m-1; i++ ) {
+	for ( i = 0; i < (2*(n-1))-1; i++ ) {
 		horner += ')';
 	}
-	str = replace( EVALPOLY_TEMPLATE, '{{coefficient}}', c[ 0 ].toString() );
+	str = c[ 0 ].toString();
+	if ( isInteger( c[ 0 ] ) ) {
+		str += '.0';
+	}
+	str = replace( EVALPOLY_TEMPLATE, '{{coefficient}}', str );
 	return replace( str, '{{horner}}', horner );
 } // end FUNCTION compile()
 

lib/node_modules/@stdlib/math/base/tools/evalpoly/test/fixtures/empty.js

@@ -0,0 +1,19 @@
+'use strict';
+
+// MAIN //
+
+/**
+* Evaluates a polynomial.
+*
+* @private
+* @param {number} x - value at which to evaluate the polynomial
+* @returns {number} evaluated polynomial
+*/
+function evalpoly() {
+	return 0.0;
+} // end FUNCTION evalpoly()
+
+
+// EXPORTS //
+
+module.exports = evalpoly;

lib/node_modules/@stdlib/math/base/tools/evalpoly/test/fixtures/evalpoly1.js

@@ -0,0 +1,27 @@
+'use strict';
+
+// MAIN //
+
+/**
+* Evaluates a polynomial.
+*
+* ## Notes
+*
+* -   The implementation uses [Horner's rule]{@link http://en.wikipedia.org/wiki/Horner's_method} for efficient computation.
+*
+*
+* @private
+* @param {number} x - value at which to evaluate the polynomial
+* @returns {number} evaluated polynomial
+*/
+function evalpoly( x ) {
+	if ( x === 0.0 ) {
+		return 1.0;
+	}
+	return 1.0 + (x * (2.5 + (x * (3.14 + (x * -1.0))))); // eslint-disable-line max-len
+} // end FUNCTION evalpoly()
+
+
+// EXPORTS //
+
+module.exports = evalpoly;

lib/node_modules/@stdlib/math/base/tools/evalpoly/test/fixtures/evalpoly2.js

@@ -0,0 +1,27 @@
+'use strict';
+
+// MAIN //
+
+/**
+* Evaluates a polynomial.
+*
+* ## Notes
+*
+* -   The implementation uses [Horner's rule]{@link http://en.wikipedia.org/wiki/Horner's_method} for efficient computation.
+*
+*
+* @private
+* @param {number} x - value at which to evaluate the polynomial
+* @returns {number} evaluated polynomial
+*/
+function evalpoly( x ) {
+	if ( x === 0.0 ) {
+		return -3.14;
+	}
+	return -3.14 + (x * 0.0); // eslint-disable-line max-len
+} // end FUNCTION evalpoly()
+
+
+// EXPORTS //
+
+module.exports = evalpoly;