From 1e8c55186c60e517b8cea602297c159b66c50d2a Mon Sep 17 00:00:00 2001 From: retropikzel Date: Tue, 5 Aug 2025 08:21:33 +0300 Subject: [PATCH] Fixing stklos --- 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 c6c3d1e..cbe8d78 100644 --- a/foreign/c/pointer.scm +++ b/foreign/c/pointer.scm @@ -107,7 +107,7 @@ (stklos (define c-null? (lambda (pointer) (cond ((void? pointer) #t) - ((and (c-bytevector? pointer) + ((and ;(c-bytevector? pointer) (= (c-memset-pointer->address pointer 0 0) 0)) #t) (else #f))))) (else (define c-null?