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

Fix blas lock bug on AArch64.

This commit is contained in:
Zhang Xianyi 2015-06-26 11:54:41 +08:00
parent d8f18d32c3
commit 3f1b57668e
1 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
common_arm64.h
View File

@ -46,21 +46,22 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
static void __inline blas_lock(volatile BLASULONG *address){ static void __inline blas_lock(volatile BLASULONG *address){
int register ret; int register ret;
int register tmp;
do { do {
while (*address) {YIELDING;}; while (*address) {YIELDING;};
__asm__ __volatile__( __asm__ __volatile__(
"1: \n\t" "1: \n\t"
"ldrex r2, [%1] \n\t" "ldaxr %2, [%1] \n\t"
"mov r2, #0 \n\t" "mov %2, #0 \n\t"
"strex r3, r2, [%1] \n\t" "stlxr %w0, %2, [%1] \n\t"
"cmp r3, #0 \n\t" "cbnz %w0, 1b \n\t"
"bne 1b \n\t" "mov %0 , #0 \n\t"
"mov %0 , r3 \n\t" : "=r"(ret), "=r"(address), "=r"(tmp)
: "=r"(ret), "=r"(address)
: "1"(address) : "1"(address)
: "memory", "r2" , "r3" : "memory", "%w0"
//, "%r2" , "%r3"
); );