Fixing stklos
This commit is contained in:
parent
5556e782d5
commit
f49da5bd7f
|
|
@ -105,7 +105,7 @@
|
|||
(stklos (define c-null?
|
||||
(lambda (pointer)
|
||||
(and pointer
|
||||
cpointer-null?))))
|
||||
(cpointer-null? pointer)))))
|
||||
(else (define c-null?
|
||||
(lambda (pointer)
|
||||
(if (c-bytevector? pointer)
|
||||
|
|
|
|||
Loading…
Reference in New Issue