From: Chris Hanson <org/chris-hanson/cph>
Date: Thu, 13 Feb 1992 18:51:54 +0000 (+0000)
Subject: Fix typo that caused "special form" to appear on console when the
X-Git-Tag: 20090517-FFI~9756
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=9d4ce1b48b72128e1c195de50b77b009f062ec32;p=mit-scheme.git

Fix typo that caused "special form" to appear on console when the
debugger was run under Edwin.
---

diff --git a/v7/src/runtime/dbgutl.scm b/v7/src/runtime/dbgutl.scm
index 40d106784..4be7ec251 100644
--- a/v7/src/runtime/dbgutl.scm
+++ b/v7/src/runtime/dbgutl.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/dbgutl.scm,v 14.15 1992/02/08 15:03:05 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/dbgutl.scm,v 14.16 1992/02/13 18:51:54 cph Exp $
 
 Copyright (c) 1988-92 Massachusetts Institute of Technology
 
@@ -45,7 +45,7 @@ MIT in each case. |#
 	      (begin
 		(write-string "a " port)
 		(write-string (string-upcase rename) port)
-		(write-string " special form") port)
+		(write-string " special form" port))
 	      (begin
 		(write-string "the procedure: " port)
 		(write-dbg-upcase-name name port))))
diff --git a/v8/src/runtime/dbgutl.scm b/v8/src/runtime/dbgutl.scm
index 95247be37..99e2343f0 100644
--- a/v8/src/runtime/dbgutl.scm
+++ b/v8/src/runtime/dbgutl.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/dbgutl.scm,v 14.15 1992/02/08 15:03:05 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/dbgutl.scm,v 14.16 1992/02/13 18:51:54 cph Exp $
 
 Copyright (c) 1988-92 Massachusetts Institute of Technology
 
@@ -45,7 +45,7 @@ MIT in each case. |#
 	      (begin
 		(write-string "a " port)
 		(write-string (string-upcase rename) port)
-		(write-string " special form") port)
+		(write-string " special form" port))
 	      (begin
 		(write-string "the procedure: " port)
 		(write-dbg-upcase-name name port))))