Retropikzel
/
foreign-c
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixing Mosh

This commit is contained in:
retropikzel 2025-07-26 09:21:48 +03:00
parent af7d7ae281
commit 0efbee8333
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
foreign/c/pointer.scm
View File

@ -103,6 +103,9 @@
(gauche (define c-null? pointer-null?)) (gauche (define c-null? pointer-null?))
(mosh (define c-null? (mosh (define c-null?
(lambda (pointer) (lambda (pointer)
(display "HERE5: ")
(display pointer)
(newline)
(if (c-bytevector? pointer) (if (c-bytevector? pointer)
(pointer-null? pointer) (pointer-null? pointer)
#f)))) #f))))