TerminalView.st
changeset 6243 949681aaf3e4
parent 6233 347f4ba07ade
--- a/TerminalView.st	Wed Apr 01 10:38:02 2020 +0200
+++ b/TerminalView.st	Sat May 02 13:15:17 2020 +0200
@@ -2443,7 +2443,7 @@
     self assert:(rangeEndLine notNil).
     "/ remember how much is in the queue...
     [
-        sizeOfOutstandingInputToBeProcessed := sizeOfOutstandingInputToBeProcessed - count.
+        sizeOfOutstandingInputToBeProcessed := (sizeOfOutstandingInputToBeProcessed - count) max:0.
     ] valueUninterruptably.
     "/ Debug := true
     "/ Debug := false
@@ -2654,8 +2654,8 @@
 
     "Created: / 10-06-1998 / 17:26:09 / cg"
     "Modified: / 28-01-2002 / 20:41:36 / micha"
-    "Modified: / 30-07-2013 / 10:47:19 / cg"
     "Modified: / 28-06-2019 / 09:20:12 / Claus Gittinger"
+    "Modified: / 02-05-2020 / 12:49:26 / cg"
 !
 
 sync