From 542d30c98dad97a8afc4a5a50bef8e003f220884 Mon Sep 17 00:00:00 2001 From: retropikzel Date: Wed, 23 Jul 2025 06:56:22 +0300 Subject: [PATCH] Fixing chibi uint8-ref --- foreign/c/primitives/chibi/foreign-c.stub | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/foreign/c/primitives/chibi/foreign-c.stub b/foreign/c/primitives/chibi/foreign-c.stub index 0f4c6b2..c9305d3 100644 --- a/foreign/c/primitives/chibi/foreign-c.stub +++ b/foreign/c/primitives/chibi/foreign-c.stub @@ -68,8 +68,8 @@ (c-declare "void c_bytevector_u8_set(void* pointer, int offset, uint8_t value) { *(uint8_t*)((char*)pointer + offset) = value; }") (define-c void (c-bytevector-u8-set! c_bytevector_u8_set) ((maybe-null pointer void*) int uint8_t)) -(c-declare "int8_t c_bytevector_u8_ref (void* pointer, int offset) { return *(uint8_t*)((char*)pointer + offset); }") -(define-c int8_t (c-bytevector-u8-ref c_bytevector_u8_ref) ((maybe-null pointer void*) int)) +(c-declare "uint8_t c_bytevector_u8_ref (void* pointer, int offset) { return *(uint8_t*)((char*)pointer + offset); }") +(define-c uint8_t (c-bytevector-u8-ref c_bytevector_u8_ref) ((maybe-null pointer void*) int)) (c-declare "void c_bytevector_pointer_set (void* pointer, int offset, void* value) { char* p = (char*)pointer + offset; *(char**)p = value; }") (define-c void (c-bytevector-pointer-set! c_bytevector_pointer_set) ((pointer void*) int (maybe-null pointer void*)))