From: simonm <unknown>
Date: Wed, 17 Feb 1999 17:47:09 +0000 (+0000)
Subject: [project @ 1999-02-17 17:47:09 by simonm]
X-Git-Tag: Approximately_9120_patches~6539
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=1ad39b525bc94452cd7d09685c82141080f03098;p=ghc-hetmet.git

[project @ 1999-02-17 17:47:09 by simonm]
typo
---

diff --git a/ghc/rts/GC.c b/ghc/rts/GC.c
index c70f408..86acf16 100644
--- a/ghc/rts/GC.c
+++ b/ghc/rts/GC.c
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: GC.c,v 1.36 1999/02/17 17:35:32 simonm Exp $
+ * $Id: GC.c,v 1.37 1999/02/17 17:47:09 simonm Exp $
  *
  * (c) The GHC Team 1998-1999
  *
@@ -399,7 +399,7 @@ void GarbageCollect(void (*get_roots)(void))
     loop2:
       for (gen = RtsFlags.GcFlags.generations-1; gen >= 0; gen--) {
 	for (st = generations[gen].n_steps-1; st >= 0 ; st--) {
-	  if (gen == 0 && step == 0) { 
+	  if (gen == 0 && st == 0) { 
 	    continue; 
 	  }
 	  step = &generations[gen].steps[st];