From 0800635a5bcfbcfe8364bd515072a6fa25b2265e Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 26 Nov 1991 06:43:48 +0000
Subject: [PATCH] Change (CMDL/OUTPUT-PORT (NEAREST-CMDL)) to
 (NEAREST-CMDL/PORT).

---
 v7/src/runtime/gcnote.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/v7/src/runtime/gcnote.scm b/v7/src/runtime/gcnote.scm
index feec303d7..b7c01af06 100644
--- a/v7/src/runtime/gcnote.scm
+++ b/v7/src/runtime/gcnote.scm
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/gcnote.scm,v 14.8 1991/09/08 02:31:35 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/gcnote.scm,v 14.9 1991/11/26 06:43:48 cph Exp $
 
-Copyright (c) 1988-1991 Massachusetts Institute of Technology
+Copyright (c) 1988-91 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -51,7 +51,7 @@ MIT in each case. |#
     (thunk)))
 
 (define (gc-notification statistic)
-  (with-output-to-port (cmdl/output-port (nearest-cmdl))
+  (with-output-to-port (nearest-cmdl/port)
     (lambda ()
       (print-statistic statistic))))
 
-- 
2.25.1