[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