~ chicken-core (master) c515b4ed7b5c894ca5030bb9ef37321bb88327c0

commit c515b4ed7b5c894ca5030bb9ef37321bb88327c0
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Jun 25 18:33:50 2026 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu Jun 25 18:33:50 2026 +0200

    rever stupid change

diff --git a/library.scm b/library.scm
index 031594ab..094d57b1 100644
--- a/library.scm
+++ b/library.scm
@@ -4076,7 +4076,7 @@ EOF
                   (##sys#read-char/encoding
                    p enc
                    (lambda (buf start len dec)
-                     (let ((pb (##sys#make-bytevector (fx+ len 1))))
+                     (let ((pb (##sys#make-bytevector len 1)))
                        (##core#inline "C_copy_memory_with_offset" pb buf 0 start len)
                        (##sys#setslot p 10 pb)
                        (dec buf start len