Skip to content

Commit 33396ac

Browse files
Shabareesh ShettyShabareesh Shetty
authored andcommitted
chore: update c implementation
--- type: pre_commit_static_analysis_report description: Results of running static analysis checks when committing changes. report: - task: lint_filenames status: passed - task: lint_editorconfig status: passed - task: lint_markdown status: na - task: lint_package_json status: na - task: lint_repl_help status: na - task: lint_javascript_src status: na - task: lint_javascript_cli status: na - task: lint_javascript_examples status: na - task: lint_javascript_tests status: na - task: lint_javascript_benchmarks status: na - task: lint_python status: na - task: lint_r status: na - task: lint_c_src status: missing_dependencies - task: lint_c_examples status: na - task: lint_c_benchmarks status: na - task: lint_c_tests_fixtures status: na - task: lint_shell status: na - task: lint_typescript_declarations status: na - task: lint_typescript_tests status: na - task: lint_license_headers status: passed ---
1 parent bda1604 commit 33396ac

File tree

2 files changed

+12
-2
lines changed

2 files changed

+12
-2
lines changed

lib/node_modules/@stdlib/blas/base/zaxpy/src/zaxpy_cblas.c

Lines changed: 6 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -32,5 +32,10 @@
3232
* @param strideY Y stride length
3333
*/
3434
void API_SUFFIX(c_zaxpy)( const CBLAS_INT N, const stdlib_complex128_t alpha, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY ) {
35-
API_SUFFIX(cblas_zaxpy)( N, alpha, X, strideX, Y, strideY );
35+
stdlib_complex128_t *x = (stdlib_complex128_t *)X;
36+
stdlib_complex128_t *y = (stdlib_complex128_t *)Y;
37+
38+
x += stdlib_strided_min_view_buffer_index( N, strideX, offsetX ); // adjust array pointer
39+
y += stdlib_strided_min_view_buffer_index( N, strideY, offsetY ); // adjust array pointer
40+
API_SUFFIX(cblas_zaxpy)( N, alpha, (void *)x, strideX, (void *)y, strideY );
3641
}

lib/node_modules/@stdlib/blas/base/zaxpy/src/zaxpy_f.c

Lines changed: 6 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -32,6 +32,11 @@
3232
* @param strideY Y stride length
3333
*/
3434
void API_SUFFIX(c_zaxpy)( const CBLAS_INT N, const stdlib_complex128_t alpha, const void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY ) {
35-
zaxpy( &N, &alpha, X, &strideX, Y, &strideY );
35+
stdlib_complex128_t *x = (stdlib_complex128_t *)X;
36+
stdlib_complex128_t *y = (stdlib_complex128_t *)Y;
37+
38+
x += stdlib_strided_min_view_buffer_index( N, strideX, offsetX );
39+
y += stdlib_strided_min_view_buffer_index( N, strideY, offsetY );
40+
zaxpy( &N, &alpha, (void *)x, &strideX, (void *)y, &strideY );
3641
return;
3742
}

0 commit comments

Comments
 (0)