Fixing Gauche
This commit is contained in:
parent
2d41159ab8
commit
2c9db098e6
|
|
@ -106,7 +106,7 @@
|
||||||
(write pointer)
|
(write pointer)
|
||||||
(newline)
|
(newline)
|
||||||
(if (c-bytevector? pointer)
|
(if (c-bytevector? pointer)
|
||||||
(= (c-memset-pointer->address pointer 0 0) 0)
|
#t ;(= (c-memset-pointer->address pointer 0 0) 0)
|
||||||
#f)))))
|
#f)))))
|
||||||
|
|
||||||
#;(define c-bytevector->address
|
#;(define c-bytevector->address
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue