summaryrefslogtreecommitdiff
path: root/rts/LdvProfile.h
diff options
context:
space:
mode:
authorAustin Seipp <austin@well-typed.com>2014-10-21 16:38:06 -0500
committerAustin Seipp <austin@well-typed.com>2014-10-21 16:38:06 -0500
commit1d12df3794b4f230d9f1dcca9973a2d9f45fbeed (patch)
tree0887da8ff01085b4a4d921e2d8a3d1051e56dac3 /rts/LdvProfile.h
parent2dc21b97ffd8e78a177e8b3562ab8f08a566defd (diff)
downloadhaskell-1d12df3794b4f230d9f1dcca9973a2d9f45fbeed.tar.gz
[skip ci] rts: Detabify LdvProfile.h
Signed-off-by: Austin Seipp <austin@well-typed.com>
Diffstat (limited to 'rts/LdvProfile.h')
-rw-r--r--rts/LdvProfile.h14
1 files changed, 7 insertions, 7 deletions
diff --git a/rts/LdvProfile.h b/rts/LdvProfile.h
index b4418046ba..d58c5fbf57 100644
--- a/rts/LdvProfile.h
+++ b/rts/LdvProfile.h
@@ -18,16 +18,16 @@ RTS_PRIVATE void LdvCensusForDead ( nat );
RTS_PRIVATE void LdvCensusKillAll ( void );
// Creates a 0-filled slop of size 'howManyBackwards' backwards from the
-// address 'from'.
+// address 'from'.
//
-// Invoked when:
+// 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.