[commit: ghc] master: rts: detabify/dewhitespace sm/GCUtils.h (7e60787)

git at git.haskell.org git at git.haskell.org
Wed Aug 20 17:31:48 UTC 2014


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

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

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

commit 7e6078757e3f3b14874a940343b1322b4493bade
Author: Austin Seipp <austin at well-typed.com>
Date:   Wed Aug 20 12:20:41 2014 -0500

    rts: detabify/dewhitespace sm/GCUtils.h
    
    Signed-off-by: Austin Seipp <austin at well-typed.com>


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

7e6078757e3f3b14874a940343b1322b4493bade
 rts/sm/GCUtils.h | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/rts/sm/GCUtils.h b/rts/sm/GCUtils.h
index de5aefc..19750b5 100644
--- a/rts/sm/GCUtils.h
+++ b/rts/sm/GCUtils.h
@@ -54,11 +54,11 @@ recordMutableGen_GC (StgClosure *p, nat gen_no)
 
     bd = gct->mut_lists[gen_no];
     if (bd->free >= bd->start + BLOCK_SIZE_W) {
-	bdescr *new_bd;
-	new_bd = allocBlock_sync();
-	new_bd->link = bd;
-	bd = new_bd;
-	gct->mut_lists[gen_no] = bd;
+        bdescr *new_bd;
+        new_bd = allocBlock_sync();
+        new_bd->link = bd;
+        bd = new_bd;
+        gct->mut_lists[gen_no] = bd;
     }
     *bd->free++ = (StgWord)p;
 }



More information about the ghc-commits mailing list