From c599e44790e78bc5d04499bb91b1933d2d74db9c Mon Sep 17 00:00:00 2001
From: retropikzel <retropikzel@iki.fi>
Date: Tue, 5 Aug 2025 07:38:32 +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 5a591cf..ff7d710 100644
--- a/foreign/c/pointer.scm
+++ b/foreign/c/pointer.scm
@@ -107,7 +107,7 @@
               (display "HERE c-null?: ")
               (write pointer)
               (newline)
-              (and (pointer? c-bytevector?)
+              (and (c-bytevector? c-bytevector?)
                    (cpointer-null? pointer)))))
   (else (define c-null?
           (lambda (pointer)