From: Taylor R Campbell <campbell@mumble.net>
Date: Mon, 16 Oct 2017 14:35:03 +0000 (+0000)
Subject: Fix typo: port/state should give the state, not the type.
X-Git-Tag: mit-scheme-pucked-9.2.12~14^2~18
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=e9b3d6a9823233cecb4bbd1becd62c853a35fb80;p=mit-scheme.git

Fix typo: port/state should give the state, not the type.

Noted by ecraven.
---

diff --git a/src/runtime/runtime.pkg b/src/runtime/runtime.pkg
index dec7ecb79..aeb97efc0 100644
--- a/src/runtime/runtime.pkg
+++ b/src/runtime/runtime.pkg
@@ -2607,7 +2607,7 @@ USA.
 	  (port/set-input-terminal-mode set-input-port-terminal-mode!)
 	  (port/set-output-blocking-mode set-output-port-blocking-mode!)
 	  (port/set-output-terminal-mode set-output-port-terminal-mode!)
-	  (port/state textual-port-type)
+	  (port/state textual-port-state)
 	  (port/type textual-port-type)
 	  (port/with-input-blocking-mode with-input-port-blocking-mode)
 	  (port/with-input-terminal-mode with-input-port-terminal-mode)