~ chicken-core (master) 331070c229a64b54bcf83822025ba0ca255797fc

commit 331070c229a64b54bcf83822025ba0ca255797fc
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Mon May 18 11:28:16 2026 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Mon May 18 11:28:16 2026 +0200

    small optimization

diff --git a/library.scm b/library.scm
index 54cbd63b..6434cd65 100644
--- a/library.scm
+++ b/library.scm
@@ -3502,7 +3502,7 @@ EOF
          (to (or end n)))
     (if end
         (##sys#check-range/including end 0 n 'utf8->string))
-    (if (not (##core#inline "C_utf_validate" bv (##sys#size bv) start to))
+    (if (not (##core#inline "C_utf_validate" bv n start to))
         (##sys#error-hook (foreign-value "C_DECODING_ERROR" int)
          'utf8->string bv))
     (##sys#buffer->string bv start (##core#inline "C_fixnum_difference" to start))))