From: Debian Science Team <debian-science-maintainers@lists.alioth.debian.org>
Date: Sat, 6 May 2017 13:22:06 +0000 (+0000)
Subject: mips-remove-incorrect-blas_lock-implementation
X-Git-Tag: archive/raspbian/0.2.19-3+rpi1~1^2~1
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=c6d4dafad8456b69c38079d2c00be5ba42c3ff97;p=openblas.git

mips-remove-incorrect-blas_lock-implementation


Gbp-Pq: Name mips-remove-incorrect-blas_lock-implementation.patch
---

diff --git a/common_mips.h b/common_mips.h
index 40e6d39..b2f47e2 100644
--- a/common_mips.h
+++ b/common_mips.h
@@ -42,11 +42,6 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
 #ifndef ASSEMBLER
 
-static void INLINE blas_lock(volatile unsigned long *address){
-
-}
-#define BLAS_LOCK_DEFINED
-
 static inline unsigned int rpcc(void){
   unsigned long ret;
 
diff --git a/common_mips64.h b/common_mips64.h
index 21e706c..93bc7e5 100644
--- a/common_mips64.h
+++ b/common_mips64.h
@@ -78,28 +78,6 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
 #ifndef ASSEMBLER
 
-static void INLINE blas_lock(volatile unsigned long *address){
-
-  long int ret, val = 1;
-
-  do {
-    while (*address) {YIELDING;};
-
-    __asm__ __volatile__(
-			 "1:	ll	%0, %3\n"
-			 "	ori	%2, %0, 1\n"
-			 "	sc	%2, %1\n"
-			 "	beqz	%2, 1b\n"
-			 "	 andi	%2, %0, 1\n"
-			 "	sync\n"
-			 : "=&r" (val), "=m" (address), "=&r" (ret)
-			 : "m" (address)
-			 : "memory");
-
-  } while (ret);
-}
-#define BLAS_LOCK_DEFINED
-
 static inline unsigned int rpcc(void){
   unsigned long ret;