Fixing Mosh
This commit is contained in:
parent
1813f4d61b
commit
783c7f2a2f
|
|
@ -101,7 +101,7 @@
|
||||||
(kawa #t) ; FIXME
|
(kawa #t) ; FIXME
|
||||||
(chibi #t)
|
(chibi #t)
|
||||||
(gauche (define c-null? pointer-null?))
|
(gauche (define c-null? pointer-null?))
|
||||||
#;(mosh (define c-null?
|
(mosh (define c-null?
|
||||||
(lambda (pointer) (and (c-bytevector? pointer)
|
(lambda (pointer) (and (c-bytevector? pointer)
|
||||||
(= (pointer->integer pointer) 0)))))
|
(= (pointer->integer pointer) 0)))))
|
||||||
(else (define c-null?
|
(else (define c-null?
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue