[commit: ghc] master: [ci skip] includes: detabify/dewhitespace stg/SMP.h (efcf0ab)

git at git.haskell.org git at git.haskell.org
Wed Aug 20 17:52:24 UTC 2014


Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/efcf0ab2a5efc37c4c17cb31957c1fc37d924e50/ghc

>---------------------------------------------------------------

commit efcf0ab2a5efc37c4c17cb31957c1fc37d924e50
Author: Austin Seipp <austin at well-typed.com>
Date:   Wed Aug 20 12:43:21 2014 -0500

    [ci skip] includes: detabify/dewhitespace stg/SMP.h
    
    Signed-off-by: Austin Seipp <austin at well-typed.com>


>---------------------------------------------------------------

efcf0ab2a5efc37c4c17cb31957c1fc37d924e50
 includes/stg/SMP.h | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/includes/stg/SMP.h b/includes/stg/SMP.h
index 00608c7..76dadde 100644
--- a/includes/stg/SMP.h
+++ b/includes/stg/SMP.h
@@ -115,10 +115,10 @@ xchg(StgPtr p, StgWord w)
     __asm__ __volatile__ (
         // NB: the xchg instruction is implicitly locked, so we do not
         // need a lock prefix here.
- 	  "xchg %1,%0"
+          "xchg %1,%0"
           :"+r" (result), "+m" (*p)
           : /* no input-only operands */
-	);
+        );
 #elif powerpc_HOST_ARCH
     __asm__ __volatile__ (
         "1:     lwarx     %0, 0, %2\n"
@@ -131,8 +131,8 @@ xchg(StgPtr p, StgWord w)
     result = w;
     __asm__ __volatile__ (
         "swap %1,%0"
-	: "+r" (result), "+m" (*p)
-	: /* no input-only operands */
+        : "+r" (result), "+m" (*p)
+        : /* no input-only operands */
       );
 #elif arm_HOST_ARCH && defined(arm_HOST_ARCH_PRE_ARMv6)
     __asm__ __volatile__ ("swp %0, %1, [%2]"
@@ -179,7 +179,7 @@ cas(StgVolatilePtr p, StgWord o, StgWord n)
     return result;
 #elif i386_HOST_ARCH || x86_64_HOST_ARCH
     __asm__ __volatile__ (
- 	  "lock\ncmpxchg %3,%1"
+          "lock\ncmpxchg %3,%1"
           :"=a"(o), "+m" (*(volatile unsigned int *)p)
           :"0" (o), "r" (n));
     return o;
@@ -199,10 +199,10 @@ cas(StgVolatilePtr p, StgWord o, StgWord n)
     return result;
 #elif sparc_HOST_ARCH
     __asm__ __volatile__ (
-	"cas [%1], %2, %0"
-	: "+r" (n)
-	: "r" (p), "r" (o)
-	: "memory"
+        "cas [%1], %2, %0"
+        : "+r" (n)
+        : "r" (p), "r" (o)
+        : "memory"
     );
     return n;
 #elif arm_HOST_ARCH && defined(arm_HOST_ARCH_PRE_ARMv6)



More information about the ghc-commits mailing list