Retropikzel
/
foreign-c
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Racket uint8-ref/set! fixes

This commit is contained in:
retropikzel 2025-07-23 12:02:51 +03:00
parent ad3e5a1847
commit 8e9c371e49
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
foreign/c/primitives/racket.scm
View File

@ -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)