test: add test cases for blas/base/dgemm

PR-URL: #6724
Reviewed-by: Athan Reines <[email protected]>

Author: ShabiShett07

lib/node_modules/@stdlib/blas/base/dgemm/lib/ndarray.js

@@ -82,6 +82,12 @@ function dgemm( transA, transB, M, N, K, alpha, A, strideA1, strideA2, offsetA,
 	if ( K < 0 ) {
 		throw new RangeError( format( 'invalid argument. Fifth argument must be a nonnegative integer. Value: `%d`.', K ) );
 	}
+	if ( strideC1 === 0 ) {
+		throw new RangeError( format( 'invalid argument. Seventeenth argument must be non-zero.', strideC1 ) );
+	}
+	if ( strideC2 === 0 ) {
+		throw new RangeError( format( 'invalid argument. Eighteenth argument must be non-zero.', strideC2 ) );
+	}
 	return base( transA, transB, M, N, K, alpha, A, strideA1, strideA2, offsetA, B, strideB1, strideB2, offsetB, beta, C, strideC1, strideC2, offsetC ); // eslint-disable-line max-len
 }
 

lib/node_modules/@stdlib/blas/base/dgemm/test/test.ndarray.js

@@ -224,6 +224,52 @@ tape( 'the function throws an error if provided an invalid fifth argument', func
 	}
 });
 
+tape( 'the function throws an error if provided an invalid seventeenth argument', function test( t ) {
+	var values;
+	var data;
+	var i;
+
+	data = rarbrcntantb;
+
+	values = [
+		0
+	];
+
+	for ( i = 0; i < values.length; i++ ) {
+		t.throws( badValue( values[ i ] ), RangeError, 'throws an error when provided ' + values[ i ] );
+	}
+	t.end();
+
+	function badValue( value ) {
+		return function badValue() {
+			dgemm( data.transA, data.transB, data.M, data.N, data.K, data.alpha, new Float64Array( data.A ), data.strideA1, data.strideA2, data.offsetA, new Float64Array( data.B ), data.strideB1, data.strideB2, data.offsetB, data.beta, new Float64Array( data.C ), value, data.strideC2, data.offsetC );
+		};
+	}
+});
+
+tape( 'the function throws an error if provided an invalid eighteenth argument', function test( t ) {
+	var values;
+	var data;
+	var i;
+
+	data = rarbrcntantb;
+
+	values = [
+		0
+	];
+
+	for ( i = 0; i < values.length; i++ ) {
+		t.throws( badValue( values[ i ] ), RangeError, 'throws an error when provided ' + values[ i ] );
+	}
+	t.end();
+
+	function badValue( value ) {
+		return function badValue() {
+			dgemm( data.transA, data.transB, data.M, data.N, data.K, data.alpha, new Float64Array( data.A ), data.strideA1, data.strideA2, data.offsetA, new Float64Array( data.B ), data.strideB1, data.strideB2, data.offsetB, data.beta, new Float64Array( data.C ), data.strideC1, value, data.offsetC );
+		};
+	}
+});
+
 tape( 'the function performs the matrix-matrix operation `C = α*op(A)*op(B) + β*C` (column_major, column_major, column_major, no-transpose, no-transpose)', function test( t ) {
 	var expected;
 	var data;