Fixing stklos
This commit is contained in:
parent
ae26c3b642
commit
cf6d150f3d
|
|
@ -102,6 +102,7 @@
|
||||||
(kawa #t) ; FIXME
|
(kawa #t) ; FIXME
|
||||||
(chibi #t)
|
(chibi #t)
|
||||||
(gauche (define c-null? pointer-null?))
|
(gauche (define c-null? pointer-null?))
|
||||||
|
(stklos (define c-null? cpointer-null?))
|
||||||
(else (define c-null?
|
(else (define c-null?
|
||||||
(lambda (pointer)
|
(lambda (pointer)
|
||||||
(if (c-bytevector? pointer)
|
(if (c-bytevector? pointer)
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue