Fixing Mosh

2025-07-26 09:17:17 +03:00 · 2025-07-26 09:17:17 +03:00 · a7632ba80e
parent 3fae04a510
commit a7632ba80e
1 changed files with 2 additions and 2 deletions
--- a/foreign/c/pointer.scm
+++ b/foreign/c/pointer.scm
@ -101,9 +101,9 @@
  (kawa #t) ; FIXME
  (chibi #t)
  (gauche (define c-null? pointer-null?))
-  #;(mosh (define c-null?
+  (mosh (define c-null?
          (lambda (pointer) (and (c-bytevector? pointer)
-                                 (= (pointer->integer pointer) 0)))))
+                                 (pointer-null? pointer)))))
  (else (define c-null?
          (lambda (pointer)
            (display "HERE123: ")