From 91284cf8fa62d307c7378cc50284f897cbd00a9a Mon Sep 17 00:00:00 2001
From: Martin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Date: Thu, 23 Jun 2022 07:19:54 +0200
Subject: [PATCH] Set visibility of internal symbols to hidden

---
 lapack/trti2/trti2_L.c  | 6 +++++-
 lapack/trti2/trti2_U.c  | 6 +++++-
 lapack/trti2/ztrti2_L.c | 6 +++++-
 lapack/trti2/ztrti2_U.c | 6 +++++-
 4 files changed, 20 insertions(+), 4 deletions(-)

diff --git a/lapack/trti2/trti2_L.c b/lapack/trti2/trti2_L.c
index f1c0ddf31..870c81f75 100644
--- a/lapack/trti2/trti2_L.c
+++ b/lapack/trti2/trti2_L.c
@@ -45,7 +45,11 @@
 #define TRMV	TRMV_NLN
 #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  n, lda;
   FLOAT *a;
diff --git a/lapack/trti2/trti2_U.c b/lapack/trti2/trti2_U.c
index 376be731f..a4c83a5b5 100644
--- a/lapack/trti2/trti2_U.c
+++ b/lapack/trti2/trti2_U.c
@@ -45,7 +45,11 @@
 #define TRMV	TRMV_NUN
 #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  n, lda;
   FLOAT *a;
diff --git a/lapack/trti2/ztrti2_L.c b/lapack/trti2/ztrti2_L.c
index 98ea2128d..9df94801d 100644
--- a/lapack/trti2/ztrti2_L.c
+++ b/lapack/trti2/ztrti2_L.c
@@ -45,7 +45,11 @@
 #define ZTRMV	ZTRMV_NLN
 #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  n, lda;
   FLOAT *a;
diff --git a/lapack/trti2/ztrti2_U.c b/lapack/trti2/ztrti2_U.c
index 3dac56c3f..78cf5ada1 100644
--- a/lapack/trti2/ztrti2_U.c
+++ b/lapack/trti2/ztrti2_U.c
@@ -45,7 +45,11 @@
 #define ZTRMV	ZTRMV_NUN
 #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  n, lda;
   FLOAT *a;