From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 15 May 1996 18:48:40 +0000 (+0000)
Subject: Eliminate random heuristic buffer-size modulation from previous
X-Git-Tag: 20090517-FFI~5509
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=97eba2e33c0fd4766161fe2d29fdf1f47fc7ea3e;p=mit-scheme.git

Eliminate random heuristic buffer-size modulation from previous
change.  It turns out that the behavior that necessitated this
heuristic was a bug in the runtime system.
---

diff --git a/v7/src/edwin/process.scm b/v7/src/edwin/process.scm
index 863ea02b9..b26bc0d19 100644
--- a/v7/src/edwin/process.scm
+++ b/v7/src/edwin/process.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;	$Id: process.scm,v 1.48 1996/05/14 23:35:22 cph Exp $
+;;;	$Id: process.scm,v 1.49 1996/05/15 18:48:40 cph Exp $
 ;;;
 ;;;	Copyright (c) 1991-96 Massachusetts Institute of Technology
 ;;;
@@ -617,13 +617,7 @@ after the listing is made.)"
 	 'DEFAULT)))
   (call-with-input-copier process input-region output-mark 512
     (lambda (copy-input)
-      (call-with-output-copier process output-mark input-region
-			       ;; The 16 here is a heuristic that
-			       ;; seems to work provide reasonable
-			       ;; feedback for the popclient program,
-			       ;; which at present is the only
-			       ;; subprocess that uses this feature.
-			       (if allow-redisplay? 16 512)
+      (call-with-output-copier process output-mark input-region 512
 	(lambda (copy-output)
 	  (if copy-input
 	      (if copy-output