summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRyan Newton <rrnewton@gmail.com>2013-08-31 16:10:05 -0400
committerRyan Newton <rrnewton@gmail.com>2013-08-31 16:10:05 -0400
commit8c99e698476291c9ed9e8231bd08406060f92e16 (patch)
tree8da1dbcc22794011a67ccb4c7ccad6d5c0a88314
parente251a51a990c3a9c95dabab139d42ad69479f61c (diff)
downloadhaskell-atomics.tar.gz
minor: remove tabs from fileatomics
-rw-r--r--rts/PrimOps.cmm8
1 files changed, 4 insertions, 4 deletions
diff --git a/rts/PrimOps.cmm b/rts/PrimOps.cmm
index 060f5dba98..08e7af08a1 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);
}
}