From 2c9db098e6439b518872f3c2006113d2d2b94043 Mon Sep 17 00:00:00 2001
From: retropikzel <retropikzel@iki.fi>
Date: Sat, 26 Jul 2025 08:54:12 +0300
Subject: [PATCH] Fixing Gauche

---
 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 3787f9b..25013a9 100644
--- a/foreign/c/pointer.scm
+++ b/foreign/c/pointer.scm
@@ -106,7 +106,7 @@
             (write pointer)
             (newline)
             (if (c-bytevector? pointer)
-              (= (c-memset-pointer->address pointer 0 0) 0)
+              #t ;(= (c-memset-pointer->address pointer 0 0) 0)
               #f)))))
 
 #;(define c-bytevector->address