From 8e9c371e49212855406eefe86a1bd1f69f70166e Mon Sep 17 00:00:00 2001 From: retropikzel Date: Wed, 23 Jul 2025 12:02:51 +0300 Subject: [PATCH] Racket uint8-ref/set! fixes --- foreign/c/primitives/racket.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/foreign/c/primitives/racket.scm b/foreign/c/primitives/racket.scm index a6fd08e..2d22aba 100644 --- a/foreign/c/primitives/racket.scm +++ b/foreign/c/primitives/racket.scm @@ -59,11 +59,11 @@ (define c-bytevector-u8-set! (lambda (c-bytevector k byte) - (ptr-set! c-bytevector _int8 'abs k byte))) + (ptr-set! c-bytevector _byte 'abs k byte))) (define c-bytevector-u8-ref (lambda (c-bytevector k) - (ptr-ref c-bytevector _uint8 'abs k))) + (ptr-ref c-bytevector _byte 'abs k))) (define c-bytevector-pointer-set! (lambda (c-bytevector k pointer)