From 862c4ff6b3996dd95c0e2517dad489b148e52da7 Mon Sep 17 00:00:00 2001 From: retropikzel Date: Sun, 15 Sep 2024 12:46:40 +0300 Subject: [PATCH] Fix the char type on Guile --- retropikzel/r7rs-pffi/version/guile.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/retropikzel/r7rs-pffi/version/guile.scm b/retropikzel/r7rs-pffi/version/guile.scm index 04053f4..9cdb1a4 100644 --- a/retropikzel/r7rs-pffi/version/guile.scm +++ b/retropikzel/r7rs-pffi/version/guile.scm @@ -33,8 +33,8 @@ ((equal? type 'uint32) uint32) ((equal? type 'int64) int64) ((equal? type 'uint64) uint64) - ((equal? type 'char) int) - ((equal? type 'unsigned-char) int) + ((equal? type 'char) int8) + ((equal? type 'unsigned-char) int8) ((equal? type 'short) short) ((equal? type 'unsigned-short) unsigned-short) ((equal? type 'int) int)