From 802e71bf05f7a624f7b7ef2a582ec6ca1b71e264 Mon Sep 17 00:00:00 2001 From: Ivan Pribec Date: Mon, 8 Aug 2022 15:15:52 +0200 Subject: [PATCH] Add const attribute to lsame --- kernel/generic/lsame.c | 2 +- lapack-netlib/LAPACKE/include/lapack.h | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/kernel/generic/lsame.c b/kernel/generic/lsame.c index cae8b4ae3..83fff1798 100644 --- a/kernel/generic/lsame.c +++ b/kernel/generic/lsame.c @@ -38,7 +38,7 @@ #include -int NAME(char *A, char *B){ +int NAME(const char *A, const char *B){ char a = *A; char b = *B; diff --git a/lapack-netlib/LAPACKE/include/lapack.h b/lapack-netlib/LAPACKE/include/lapack.h index e4c39e1ee..14695fdc8 100644 --- a/lapack-netlib/LAPACKE/include/lapack.h +++ b/lapack-netlib/LAPACKE/include/lapack.h @@ -115,7 +115,7 @@ typedef lapack_logical (*LAPACK_Z_SELECT2) ( const lapack_complex_double*, const lapack_complex_double* ); #define LAPACK_lsame_base LAPACK_GLOBAL(lsame,LSAME) -lapack_logical LAPACK_lsame_base( char* ca, char* cb, +lapack_logical LAPACK_lsame_base( const char* ca, const char* cb, lapack_int lca, lapack_int lcb #ifdef LAPACK_FORTRAN_STRLEN_END , size_t, size_t