refactoring C implementation

---
type: pre_push_report
description: Results of running various checks prior to pushing changes.
report:
  - task: run_javascript_examples
    status: passed
  - task: run_c_examples
    status: failed
---

---
type: pre_push_report
description: Results of running various checks prior to pushing changes.
report:
  - task: run_javascript_examples
    status: passed
  - task: run_c_examples
    status: failed
---

Author: jalajk3004

lib/node_modules/@stdlib/stats/base/dists/chisquare/mgf/examples/c/example.c

@@ -1,20 +1,20 @@
-/**
-* @license Apache-2.0
-*
-* Copyright (c) 2025 The Stdlib Authors.
-*
-* Licensed under the Apache License, Version 2.0 (the "License");
-* you may not use this file except in compliance with the License.
-* You may obtain a copy of the License at
-*
-*    http://www.apache.org/licenses/LICENSE-2.0
-*
-* Unless required by applicable law or agreed to in writing, software
-* distributed under the License is distributed on an "AS IS" BASIS,
-* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-* See the License for the specific language governing permissions and
-* limitations under the License.
-*/
+	/**
+	* @license Apache-2.0
+	*
+	* Copyright (c) 2025 The Stdlib Authors.
+	*
+	* Licensed under the Apache License, Version 2.0 (the "License");
+	* you may not use this file except in compliance with the License.
+	* You may obtain a copy of the License at
+	*
+	*    http://www.apache.org/licenses/LICENSE-2.0
+	*
+	* Unless required by applicable law or agreed to in writing, software
+	* distributed under the License is distributed on an "AS IS" BASIS,
+	* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+	* See the License for the specific language governing permissions and
+	* limitations under the License.
+	*/
 
 #include "stdlib/stats/base/dists/chisquare/mgf.h"
 #include <stdio.h>

lib/node_modules/@stdlib/stats/base/dists/signrank/quantile/benchmark/c/Makefile

@@ -1,7 +1,7 @@
 #/
 # @license Apache-2.0
 #
-# Copyright (c) 2024 The Stdlib Authors.
+# Copyright (c) 2025 The Stdlib Authors.
 #
 # Licensed under the Apache License, Version 2.0 (the "License");
 # you may not use this file except in compliance with the License.
@@ -70,19 +70,19 @@ else
 endif
 
 # List of includes (e.g., `-I /foo/bar -I /beep/boop/include`):
-INCLUDE ?=
+INCLUDE := -I$(PWD)/lib/node_modules/@stdlib/stats/base/dists/signrank/quantile/include
 
 # List of source files:
 SOURCE_FILES ?=
 
 # List of libraries (e.g., `-lopenblas -lpthread`):
-LIBRARIES ?=
+LIBRARIES := -lstdlib_base_dists_signrank_quantile -lm
 
 # List of library paths (e.g., `-L /foo/bar -L /beep/boop`):
-LIBPATH ?=
+LIBPATH := -L$(PWD)/lib/node_modules/@stdlib/stats/base/dists/signrank/quantile/lib 
 
 # List of C targets:
-c_targets := benchmark.out
+c_targets := example.out
 
 
 # RULES #
@@ -120,11 +120,13 @@ all: $(c_targets)
 # @param {string} LIBPATH - list of library paths (e.g., `-L /foo/bar`)
 # @param {string} LIBRARIES - list of libraries (e.g., `-lopenblas`)
 #/
+
 $(c_targets): %.out: %.c
-	$(QUIET) $(CC) $(CFLAGS) $(fPIC) $(INCLUDE) -o $@ $(SOURCE_FILES) $< $(LIBPATH) -lm $(LIBRARIES)
+	$(QUIET) $(CC) $(CFLAGS) $(fPIC) $(INCLUDE) -o $@ $< $(LIBPATH) -lm $(LIBRARIES)
+
 
 #/
-# Runs compiled benchmarks.
+# Runs compiled examples.
 #
 # @example
 # make run
@@ -143,3 +145,5 @@ run: $(c_targets)
 clean:
 	$(QUIET) -rm -f *.o *.out
 
+.PHONY: clean
+

lib/node_modules/@stdlib/stats/base/dists/signrank/quantile/benchmark/c/benchmark.c

@@ -28,6 +28,7 @@ static void benchmark_quantile(int n) {
     double result;
     clock_t start, end;
     double elapsed;
+    double sum = 0.0;
 
     printf("Benchmarking signrank_quantile with %d iterations for n=%d...\n", NUM_ITERATIONS, n);
 
@@ -36,7 +37,8 @@ static void benchmark_quantile(int n) {
 
     for (int i = 0; i < NUM_ITERATIONS; i++) {
         p = (double)(i % 101) / 100.0;  // Generate p values in [0, 1]
-        result = signrank_quantile(p, n);
+        result = stdlib_base_dists_signrank_quantile(p, n);
+        sum += result; 
     }
 
     // End timer
@@ -48,6 +50,7 @@ static void benchmark_quantile(int n) {
     // Print benchmark results
     printf("Elapsed time: %.6f seconds\n", elapsed);
     printf("Average time per call: %.6f microseconds\n", (elapsed / NUM_ITERATIONS) * 1e6);
+    printf("Sum of results: %.6f\n", sum);
 }
 
 int main() {

lib/node_modules/@stdlib/stats/base/dists/signrank/quantile/examples/c/Makefile

@@ -1,7 +1,7 @@
 #/
 # @license Apache-2.0
 #
-# Copyright (c) 2024 The Stdlib Authors.
+# Copyright (c) 2025 The Stdlib Authors.
 #
 # Licensed under the Apache License, Version 2.0 (the "License");
 # you may not use this file except in compliance with the License.
@@ -70,16 +70,16 @@ else
 endif
 
 # List of includes (e.g., `-I /foo/bar -I /beep/boop/include`):
-INCLUDE ?=
+INCLUDE := -I$(PWD)/lib/node_modules/@stdlib/stats/base/dists/signrank/quantile/include
 
 # List of source files:
 SOURCE_FILES ?=
 
 # List of libraries (e.g., `-lopenblas -lpthread`):
-LIBRARIES ?=
+LIBRARIES := -lstdlib_base_dists_signrank_quantile -lm
 
 # List of library paths (e.g., `-L /foo/bar -L /beep/boop`):
-LIBPATH ?=
+LIBPATH := -L$(PWD)/lib/node_modules/@stdlib/stats/base/dists/signrank/quantile/lib 
 
 # List of C targets:
 c_targets := example.out
@@ -120,8 +120,10 @@ all: $(c_targets)
 # @param {string} LIBPATH - list of library paths (e.g., `-L /foo/bar`)
 # @param {string} LIBRARIES - list of libraries (e.g., `-lopenblas`)
 #/
+
 $(c_targets): %.out: %.c
-	$(QUIET) $(CC) $(CFLAGS) $(fPIC) $(INCLUDE) -o $@ $(SOURCE_FILES) $< $(LIBPATH) -lm $(LIBRARIES)
+	$(QUIET) $(CC) $(CFLAGS) $(fPIC) $(INCLUDE) -o $@ $< $(LIBPATH) -lm $(LIBRARIES)
+
 
 #/
 # Runs compiled examples.
@@ -144,3 +146,4 @@ clean:
 	$(QUIET) -rm -f *.o *.out
 
 .PHONY: clean
+

lib/node_modules/@stdlib/stats/base/dists/signrank/quantile/examples/c/example.c

@@ -16,33 +16,27 @@
 * limitations under the License.
 */
 
+#include "stdlib/stats/base/dists/signrank/quantile.h"
 #include <stdio.h>
 #include <stdlib.h>
-#include <time.h>
-#include "stdlib/stats/base/dists/signrank/quantile.h"
 
-// Function to generate a random integer between min and max (inclusive)
 int randint(int min, int max) {
     return min + rand() % (max - min + 1);
 }
 
-// Function to generate a random double in the range [0, 1)
 double randu() {
     return (double)rand() / (double)RAND_MAX;
 }
 
-int main() {
+int main() {    
     int n;
     double p;
     double y;
 
-    // Seed the random number generator
-    srand((unsigned int)time(NULL));
-
     for (int i = 0; i < 10; i++) {
         p = randu();
         n = randint(1, 20);
-        y = signrank_quantile(p, n);
+        y = stdlib_base_dists_signrank_quantile(p, n);
         printf("p: %.4f, n: %d, Q(p;n): %.4f\n", p, n, y);
     }
 

lib/node_modules/@stdlib/stats/base/dists/signrank/quantile/include/stdlib/stats/base/dists/signrank/quantile.h

@@ -28,4 +28,4 @@
  */
 double stdlib_base_dists_signrank_quantile(double p, int n);
 
-#endif // QUANTILE_H
+#endif // !QUANTILE_H

lib/node_modules/@stdlib/stats/base/dists/signrank/quantile/lib/native.js

@@ -21,6 +21,8 @@
 // MODULES //
 
 var addon = require( './../src/addon.node' );
+console.log(addon);
+
 
 
 // MAIN //

lib/node_modules/@stdlib/stats/base/dists/signrank/quantile/test/test.native.js

@@ -20,58 +20,58 @@
 
 // MODULES //
 
-// Include the function to be tested
+var resolve = require('path').resolve;
 var tape = require('tape');
+var path = require('path');
 
-// Replace `addon` with your actual function, for example:
-var quantileFunction = require('./../lib/native.js'); // Adjust the path accordingly
+// VARIABLES //
+var quantile = require(resolve(__dirname, './../lib/native.js'));
+var opts = {
+	'skip': ( quantile instanceof Error )
+};
+
+// FIXTURES //
+
+var data = require('./fixtures/r/data.json');
 
 // TESTS //
 
-// Check that the main export is a function
-tape('main export is a function', function test(t) {
+tape('main export is a function',opts, function test(t) {
     t.ok(true, __filename);
-    t.strictEqual(typeof quantileFunction, 'function', 'main export is a function');
+    t.strictEqual(typeof quantile, 'function', 'main export is a function');
     t.end();
 });
 
 // Test that the function returns expected quantiles for valid inputs
-tape('the function returns expected quantiles for valid inputs', function test(t) {
-    var probabilities = [0.1, 0.25, 0.5, 0.75, 0.9];
-    var sampleSizes = [3, 5, 7, 10];
-    var expected;
-    var actual;
-    var p;
-    var n;
-    var i;
-    var j;
+tape('the function returns expected quantiles for valid inputs',opts, function test(t) {
+    var probabilities = data.p;
+    var sampleSizes = data.n;
+    var expectedValues = data.expected;
+    var actual, p, n;
+
+    t.plan(probabilities.length);
 
-    for (i = 0; i < sampleSizes.length; i++) {
+    for (var i = 0; i < probabilities.length; i++) {
+        p = probabilities[i];
         n = sampleSizes[i];
-        for (j = 0; j < probabilities.length; j++) {
-            p = probabilities[j];
-            actual = quantileFunction(p, n);
+        actual = quantile(p, n);
 
-            // Compute expected value based on known results or formula (placeholder logic here):
-            expected /* Insert logic or precomputed values */;
-            t.strictEqual(actual, expected, 'returns ' + expected + ' for p: ' + p + ', n: ' + n);
-        }
+        t.strictEqual(actual, expectedValues[i], 'returns ' + expectedValues[i] + ' for p: ' + p + ', n: ' + n);
     }
     t.end();
 });
 
 // Test that the function returns NaN for invalid inputs
-tape('the function returns NaN for invalid inputs', function test(t) {
+tape('the function returns NaN for invalid inputs',opts, function test(t) {
     var invalidProbabilities = [-0.1, 1.1, NaN];
     var invalidSampleSizes = [-5, 0, 3.5, NaN];
-    var i;
 
-    for (i = 0; i < invalidProbabilities.length; i++) {
-        t.ok(isNaN(quantileFunction(invalidProbabilities[i], 5)), 'returns NaN for invalid probability: ' + invalidProbabilities[i]);
+    for (var i = 0; i < invalidProbabilities.length; i++) {
+        t.ok(isNaN(quantile(invalidProbabilities[i], 5)), 'returns NaN for invalid probability: ' + invalidProbabilities[i]);
     }
 
-    for (i = 0; i < invalidSampleSizes.length; i++) {
-        t.ok(isNaN(quantileFunction(0.5, invalidSampleSizes[i])), 'returns NaN for invalid sample size: ' + invalidSampleSizes[i]);
+    for (var j = 0; j < invalidSampleSizes.length; j++) {
+        t.ok(isNaN(quantile(0.5, invalidSampleSizes[j])), 'returns NaN for invalid sample size: ' + invalidSampleSizes[j]);
     }
     t.end();
 });