Add const attribute to lsame

This commit is contained in:
Ivan Pribec 2022-08-08 15:15:52 +02:00
parent e671d0386b
commit 802e71bf05
2 changed files with 2 additions and 2 deletions

View File

@ -38,7 +38,7 @@
#include <ctype.h>
int NAME(char *A, char *B){
int NAME(const char *A, const char *B){
char a = *A;
char b = *B;

View File

@ -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