[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