~ chicken-core (master) dbc7340be875e42029a2084249d2b64e5d9681e0

commit dbc7340be875e42029a2084249d2b64e5d9681e0
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Sep 3 10:58:24 2026 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu Sep 3 10:58:24 2026 +0200

    mark as deprecated

diff --git a/port.scm b/port.scm
index 902e5ca1..1d24bf0b 100644
--- a/port.scm
+++ b/port.scm
@@ -352,7 +352,7 @@ char *ttyname(int fd) {
 ;   10: last/peeked
 
 (define make-input-port
-  (lambda (read ready? close #!rest r
+  (lambda (read ready? close #!rest r       ; "read-buffered" is deprecated
                 #!key peek-char read-bytevector read-line read-buffered)
     (define (insert dest start c)
       (let* ((bv (##sys#make-bytevector 4))