~ chicken-core (master) be5329fc1ef3be24b5d07552b569176d2ccbc070
commit be5329fc1ef3be24b5d07552b569176d2ccbc070
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Sat Sep 5 23:12:12 2026 +0200
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Sat Sep 5 23:12:12 2026 +0200
handle identically
diff --git a/library.scm b/library.scm
index 52b2c7bd..ea3f8b80 100644
--- a/library.scm
+++ b/library.scm
@@ -1730,13 +1730,8 @@ EOF
(k buf 0 n)))
(define (##sys#latin-scanner state byte) #f)
-
-(define (##sys#binary-decoder bv start len k)
- (k bv start len) )
-
-(define (##sys#binary-encoder bv start len k)
- (k bv start len) )
-
+(define ##sys#binary-decoder ##sys#latin-decoder)
+(define ##sys#binary-encoder ##sys#latin-encoder)
(define (##sys#binary-scanner state byte) #f)
;; invokes k with encoding and decoding procedures
Trap