From: Chris Hanson <org/chris-hanson/cph>
Date: Thu, 18 Aug 1988 02:02:37 +0000 (+0000)
Subject: Fix editing error.
X-Git-Tag: 20090517-FFI~12603
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=a8295569bf6a02331b8546f8c78c6304ccd3a2f4;p=mit-scheme.git

Fix editing error.
---

diff --git a/v7/src/compiler/fggen/fggen.scm b/v7/src/compiler/fggen/fggen.scm
index 2fff5b847..9fc4c3ca1 100644
--- a/v7/src/compiler/fggen/fggen.scm
+++ b/v7/src/compiler/fggen/fggen.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/fggen/fggen.scm,v 4.9 1988/08/18 01:35:15 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/fggen/fggen.scm,v 4.10 1988/08/18 02:02:37 cph Exp $
 
 Copyright (c) 1988 Massachusetts Institute of Technology
 
@@ -496,7 +496,7 @@ MIT in each case. |#
 	   (lambda () (make-combination false continuation))
 	   (lambda ()
 	     (if (variable? continuation)
-		 (make-combination continuation)
+		 (make-combination false continuation)
 		 (with-reified-continuation block
 					    continuation
 					    scfg*scfg->scfg!