floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Set visibility of internal symbols to hidden

This commit is contained in:
Martin Kroeker 2022-06-23 07:18:10 +02:00 committed by GitHub
parent 92557c6feb
commit 938eed7b6c
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 20 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lapack/trtrs/trtrs_parallel.c
View File

@ -73,7 +73,11 @@ static int inner_thread(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n,
return 0;
}
blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG mypos) {
blasint
#ifndef C_MSVC
__attribute__((visibility("hidden")))
#endif
CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG mypos) {
int mode;

6
lapack/trtrs/trtrs_single.c
View File

@ -65,7 +65,11 @@
#define TRSV TRSV_TLN
#endif
blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG mypos) {
blasint
#ifndef C_MSVC
__attribute__((visibility("hidden")))
#endif
CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG mypos) {
if (args -> n == 1){
TRSV (args -> m, args -> a, args -> lda, args -> b, 1, sb);

6
lapack/trtrs/ztrtrs_parallel.c
View File

@ -96,7 +96,11 @@ static int inner_thread(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n,
return 0;
}
blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG mypos) {
blasint
#ifndef C_MSVC
__attribute__((visibility("hidden")))
#endif
CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG mypos) {
int mode;

6
lapack/trtrs/ztrtrs_single.c
View File

@ -89,7 +89,11 @@
#define ZTRSV ZTRSV_CLN
#endif
blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG mypos) {
blasint
#ifndef C_MSVC
__attribute__((visibility("hidden")))
#endif
CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG mypos) {
if (args -> n == 1){
ZTRSV (args -> m, args -> a, args -> lda, args -> b, 1, sb);
} else {