Merge pull request Reference-LAPACK#699 from ivan-pi/lsame

Add const to LAPACK_lsame_base
chrwarm · Aug 9, 2022 · 984dcc0 · 984dcc0
2 parents 3381a0e + 9079671
commit 984dcc0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/LAPACKE/include/lapack.h b/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