[commit: ghc] master: [skip ci] rts: Detabify LdvProfile.h (1d12df3)

git at git.haskell.org git at git.haskell.org
Tue Oct 21 21:51:30 UTC 2014


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

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

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

commit 1d12df3794b4f230d9f1dcca9973a2d9f45fbeed
Author: Austin Seipp <austin at well-typed.com>
Date:   Tue Oct 21 16:38:06 2014 -0500

    [skip ci] rts: Detabify LdvProfile.h
    
    Signed-off-by: Austin Seipp <austin at well-typed.com>


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

1d12df3794b4f230d9f1dcca9973a2d9f45fbeed
 rts/LdvProfile.h | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/rts/LdvProfile.h b/rts/LdvProfile.h
index b441804..d58c5fb 100644
--- a/rts/LdvProfile.h
+++ b/rts/LdvProfile.h
@@ -23,11 +23,11 @@ RTS_PRIVATE void LdvCensusKillAll ( void );
 // Invoked when:
 //   1) Hp is incremented and exceeds HpLim (in Updates.hc).
 //   2) copypart() is called (in GC.c).
-#define LDV_FILL_SLOP(from, howMany)	\
-  if (era > 0) {				\
-    int i;					\
-    for (i = 0;i < (howMany); i++)	\
-      ((StgWord *)(from))[i] = 0;		\
+#define LDV_FILL_SLOP(from, howMany)    \
+  if (era > 0) {                                \
+    int i;                                      \
+    for (i = 0;i < (howMany); i++)      \
+      ((StgWord *)(from))[i] = 0;               \
   }
 
 // Informs the LDV profiler that closure c has just been evacuated.



More information about the ghc-commits mailing list