~ chicken-core (chicken-5) 19a28b879d7db6ffa9afd4588a0de35e459d67a5

commit 19a28b879d7db6ffa9afd4588a0de35e459d67a5
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Wed Dec 18 13:45:38 2024 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Wed Dec 18 13:45:38 2024 +0100

    drop incorrect extra wrapper of parens

diff --git a/library.scm b/library.scm
index c3a182a5..8fba86d7 100644
--- a/library.scm
+++ b/library.scm
@@ -1209,7 +1209,7 @@ EOF
                (lambda (_) ; peek-char
                  (if (eq? index bv-len)
                      #!eof
-                     ((##core#inline "C_i_bytevector_ref" bv index))))
+                     (##core#inline "C_i_bytevector_ref" bv index)))
                #f    ; write-char
                #f    ; write-bytevector
                (lambda (_ _) ; close