feat: temp commit

Author: anandkaranubc

lib/node_modules/@stdlib/math/base/special/gammainc/scripts/evalpoly.js

@@ -24,10 +24,15 @@
 // MODULES //
 
 var resolve = require( 'path' ).resolve;
+var readFileSync = require( '@stdlib/fs/read-file' ).sync;
 var writeFileSync = require( '@stdlib/fs/write-file' ).sync;
 var currentYear = require( '@stdlib/time/current-year' );
 var licenseHeader = require( '@stdlib/_tools/licenses/header' );
 var compile = require( '@stdlib/math/base/tools/evalpoly-compile' );
+var compileC = require( '@stdlib/math/base/tools/evalpoly-compile-c' );
+var substringBefore = require( '@stdlib/string/substring-before' );
+var substringAfter = require( '@stdlib/string/substring-after' );
+var format = require( '@stdlib/string/format' );
 
 
 // VARIABLES //
@@ -139,6 +144,33 @@ var header = licenseHeader( 'Apache-2.0', 'js', {
 header += '\n/* This is a generated file. Do not edit directly. */\n';
 
 
+// FUNCTIONS //
+
+/**
+* Inserts a compiled function into file content.
+*
+* @private
+* @param {string} text - source content
+* @param {string} id - function identifier
+* @param {string} str - function string
+* @returns {string} updated content
+*/
+function insert( text, id, str ) {
+	var before;
+	var after;
+	var begin;
+	var end;
+
+	begin = '// BEGIN: '+id;
+	end = '// END: '+id;
+
+	before = substringBefore( text, begin );
+	after = substringAfter( text, end );
+
+	return format( '%s// BEGIN: %s\n\n%s\n%s%s', before, id, str, end, after );
+}
+
+
 // MAIN //
 
 /**
@@ -148,7 +180,9 @@ header += '\n/* This is a generated file. Do not edit directly. */\n';
 */
 function main() {
 	var fpath;
+	var copts;
 	var opts;
+	var file;
 	var str;
 
 	opts = {
@@ -190,6 +224,51 @@ function main() {
 	fpath = resolve( __dirname, '..', 'lib', 'polyval_c8.js' );
 	str = header + compile( C8 );
 	writeFileSync( fpath, str, opts );
+
+	copts = {
+		'dtype': 'double',
+		'name': ''
+	};
+	fpath = resolve( __dirname, '..', 'src', 'main.c' );
+	file = readFileSync( fpath, opts );
+
+	copts.name = 'polyval_c0';
+	str = compileC( C0, copts );
+	file = insert( file, copts.name, str );
+
+	copts.name = 'polyval_c1';
+	str = compileC( C1, copts );
+	file = insert( file, copts.name, str );
+
+	copts.name = 'polyval_c2';
+	str = compileC( C2, copts );
+	file = insert( file, copts.name, str );
+
+	copts.name = 'polyval_c3';
+	str = compileC( C3, copts );
+	file = insert( file, copts.name, str );
+
+	copts.name = 'polyval_c4';
+	str = compileC( C4, copts );
+	file = insert( file, copts.name, str );
+
+	copts.name = 'polyval_c5';
+	str = compileC( C5, copts );
+	file = insert( file, copts.name, str );
+
+	copts.name = 'polyval_c6';
+	str = compileC( C6, copts );
+	file = insert( file, copts.name, str );
+
+	copts.name = 'polyval_c7';
+	str = compileC( C7, copts );
+	file = insert( file, copts.name, str );
+
+	copts.name = 'polyval_c8';
+	str = compileC( C8, copts );
+	file = insert( file, copts.name, str );
+
+	writeFileSync( fpath, file, opts );
 }
 
 main();