From f03cf5376cad8de85b0fb52abc5446c20b5fb2ba Mon Sep 17 00:00:00 2001 From: retropikzel Date: Sat, 26 Jul 2025 20:28:53 +0300 Subject: [PATCH] Fixing Mosh --- foreign/c/pointer.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/foreign/c/pointer.scm b/foreign/c/pointer.scm index 29f9f23..b411479 100644 --- a/foreign/c/pointer.scm +++ b/foreign/c/pointer.scm @@ -102,7 +102,7 @@ (kawa #t) ; FIXME (chibi #t) (gauche (define c-null? pointer-null?)) - (mosh (define c-null? pointer-null?)) + (mosh (define c-null? (lambda (pointer) (= (pointer->integer pointer) 0)))) (else (define c-null? (lambda (pointer) (if (c-bytevector? pointer)