[commit: ghc] master: minor: remove tabs from file (8c99e69)

git at git.haskell.org git at git.haskell.org
Sat Aug 31 22:10:28 CEST 2013


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

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

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

commit 8c99e698476291c9ed9e8231bd08406060f92e16
Author: Ryan Newton <rrnewton at gmail.com>
Date:   Sat Aug 31 16:10:05 2013 -0400

    minor: remove tabs from file


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

8c99e698476291c9ed9e8231bd08406060f92e16
 rts/PrimOps.cmm |    8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/rts/PrimOps.cmm b/rts/PrimOps.cmm
index 060f5db..08e7af0 100644
--- a/rts/PrimOps.cmm
+++ b/rts/PrimOps.cmm
@@ -249,10 +249,10 @@ stg_casArrayzh ( gcptr arr, W_ ind, gcptr old, gcptr new )
         return (1,h);
     } else {
         // Compare and Swap Succeeded:
-	SET_HDR(arr, stg_MUT_ARR_PTRS_DIRTY_info, CCCS);
-	len = StgMutArrPtrs_ptrs(arr);
-	// The write barrier.  We must write a byte into the mark table:
-	I8[arr + SIZEOF_StgMutArrPtrs + WDS(len) + (ind >> MUT_ARR_PTRS_CARD_BITS )] = 1;
+        SET_HDR(arr, stg_MUT_ARR_PTRS_DIRTY_info, CCCS);
+        len = StgMutArrPtrs_ptrs(arr);
+        // The write barrier.  We must write a byte into the mark table:
+        I8[arr + SIZEOF_StgMutArrPtrs + WDS(len) + (ind >> MUT_ARR_PTRS_CARD_BITS )] = 1;
         return (0,new);
     }
 }





More information about the ghc-commits mailing list