summaryrefslogtreecommitdiff
path: root/ghc
diff options
context:
space:
mode:
Diffstat (limited to 'ghc')
-rw-r--r--ghc/rts/Printer.c6
1 files changed, 1 insertions, 5 deletions
diff --git a/ghc/rts/Printer.c b/ghc/rts/Printer.c
index 134dce4d7e..b454b46da4 100644
--- a/ghc/rts/Printer.c
+++ b/ghc/rts/Printer.c
@@ -1094,11 +1094,7 @@ findPtr(P_ p, int follow)
for (g = 0; g < RtsFlags.GcFlags.generations; g++) {
for (s = 0; s < generations[g].n_steps; s++) {
- if (RtsFlags.GcFlags.generations == 1) {
- bd = generations[g].steps[s].to_blocks;
- } else {
- bd = generations[g].steps[s].blocks;
- }
+ bd = generations[g].steps[s].blocks;
for (; bd; bd = bd->link) {
for (q = bd->start; q < bd->free; q++) {
if (*q == (W_)p) {