diff options
| -rw-r--r-- | ghc/rts/GC.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/rts/GC.c b/ghc/rts/GC.c index 1e40065f3b..4235d3e826 100644 --- a/ghc/rts/GC.c +++ b/ghc/rts/GC.c @@ -4690,8 +4690,8 @@ end: // Should we squeeze or not? Arbitrary heuristic: we squeeze if // the number of words we have to shift down is less than the // number of stack words we squeeze away by doing so. - if (1 /*RtsFlags.GcFlags.squeezeUpdFrames == rtsTrue && - weight < words_to_squeeze*/) { + if (RtsFlags.GcFlags.squeezeUpdFrames == rtsTrue && + weight < words_to_squeeze) { stackSqueeze(tso, (StgPtr)frame); } } |