From a7632ba80e03e315bb9a3e61a66f8ceaa951b50c Mon Sep 17 00:00:00 2001 From: retropikzel Date: Sat, 26 Jul 2025 09:17:17 +0300 Subject: [PATCH] Fixing Mosh --- foreign/c/pointer.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/foreign/c/pointer.scm b/foreign/c/pointer.scm index e7a7fee..5162284 100644 --- a/foreign/c/pointer.scm +++ b/foreign/c/pointer.scm @@ -101,9 +101,9 @@ (kawa #t) ; FIXME (chibi #t) (gauche (define c-null? pointer-null?)) - #;(mosh (define c-null? + (mosh (define c-null? (lambda (pointer) (and (c-bytevector? pointer) - (= (pointer->integer pointer) 0))))) + (pointer-null? pointer))))) (else (define c-null? (lambda (pointer) (display "HERE123: ")