From 62dd4ce93dc634be4f7c96e1f72eb13f95064434 Mon Sep 17 00:00:00 2001 From: retropikzel Date: Sat, 26 Jul 2025 09:23:58 +0300 Subject: [PATCH] Fixing Mosh --- foreign/c/pointer.scm | 14 +------------- 1 file changed, 1 insertion(+), 13 deletions(-) diff --git a/foreign/c/pointer.scm b/foreign/c/pointer.scm index 49bca30..b0d235a 100644 --- a/foreign/c/pointer.scm +++ b/foreign/c/pointer.scm @@ -100,19 +100,7 @@ (chicken #t) ; FIXME (kawa #t) ; FIXME (chibi #t) - (gauche (define c-null? pointer-null?)) - #;(mosh (define c-null? - (lambda (pointer) - (display "HERE5: ") - (display pointer) - (newline) - (display (if (c-bytevector? pointer) - (pointer-null? pointer) - #f)) - (newline) - (if (c-bytevector? pointer) - (pointer-null? pointer) - #f)))) + ;(gauche (define c-null? pointer-null?)) (else (define c-null? (lambda (pointer) (display "HERE123: ")