build: LLVM: Add Flang compiler support and enable OpenMP for Clang

[platform/upstream/openblas.git] / common_x86.h

diff --git a/common_x86.h b/common_x86.h
index 1ace84c..4363fb2 100644 (file)
--- a/common_x86.h
+++ b/common_x86.h
@@ -41,6 +41,10 @@
 
 #ifndef ASSEMBLER
 
+#ifdef C_MSVC
+#include <intrin.h>
+#endif
+
 #define MB
 #define WMB
 
@@ -58,7 +62,7 @@ static void __inline blas_lock(volatile BLASULONG *address){
 
 #if defined(_MSC_VER) && !defined(__clang__)
        // use intrinsic instead of inline assembly
-       ret = _InterlockedExchange(address, 1);
+       ret = _InterlockedExchange((volatile LONG *)address, 1);
        // inline assembly
        /*__asm {
                mov eax, address
@@ -170,12 +174,13 @@ static __inline int blas_quickdivide(unsigned int x, unsigned int y){
 
   if (y <= 1) return x;
 
-  y = blas_quick_divide_table[y];
-
 #if defined(_MSC_VER) && !defined(__clang__)
-  (void*)result;
-  return x*y;
+  result = x/y;
+  return result;
 #else
+
+  y = blas_quick_divide_table[y];
+
   __asm__ __volatile__  ("mull %0" :"=d" (result) :"a"(x), "0" (y));
 
   return result;