diff --git a/lapack/trtri/trtri_L_parallel.c b/lapack/trtri/trtri_L_parallel.c index fb8c8fc77..035b799ec 100644 --- a/lapack/trtri/trtri_L_parallel.c +++ b/lapack/trtri/trtri_L_parallel.c @@ -49,7 +49,11 @@ #define TRSM TRSM_RNLN #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) { BLASLONG n, info; BLASLONG bk, i, blocking, start_i; diff --git a/lapack/trtri/trtri_L_single.c b/lapack/trtri/trtri_L_single.c index 3e4343060..284957692 100644 --- a/lapack/trtri/trtri_L_single.c +++ b/lapack/trtri/trtri_L_single.c @@ -51,7 +51,11 @@ #endif -blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG myid) { +blasint +#ifndef C_MSVC +__attribute__((visibility("hidden"))) +#endif + CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG myid) { BLASLONG j, n, lda; FLOAT *a; diff --git a/lapack/trtri/trtri_U_parallel.c b/lapack/trtri/trtri_U_parallel.c index 5287421d6..e4024c1bd 100644 --- a/lapack/trtri/trtri_U_parallel.c +++ b/lapack/trtri/trtri_U_parallel.c @@ -49,7 +49,11 @@ #define TRSM TRSM_RNUN #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) { BLASLONG n, info; BLASLONG bk, i, blocking; diff --git a/lapack/trtri/trtri_U_single.c b/lapack/trtri/trtri_U_single.c index e4da5da59..b77b2e7e4 100644 --- a/lapack/trtri/trtri_U_single.c +++ b/lapack/trtri/trtri_U_single.c @@ -55,7 +55,11 @@ #endif -blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG myid) { +blasint +#ifndef C_MSVC +__attribute__((visibility("hidden"))) +#endif + CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG myid) { BLASLONG j, n, lda; FLOAT *a;