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