Fixing stklos

2025-08-05 07:39:18 +03:00
parent c599e44790
commit d90f9cee3c
1 changed files with 2 additions and 1 deletions
@@ -107,7 +107,8 @@
              (display "HERE c-null?: ")
              (write pointer)
              (newline)
-              (and (c-bytevector? c-bytevector?)
+              (and (not (void? pointer))
                   (c-bytevector? c-bytevector?)
                   (cpointer-null? pointer)))))
  (else (define c-null?
          (lambda (pointer)