Fixing Kawa
This commit is contained in:
parent
44c83e8c6b
commit
5c5b0f5eba
|
|
@ -76,9 +76,6 @@
|
||||||
|
|
||||||
(define c-utf8->string
|
(define c-utf8->string
|
||||||
(lambda (c-bytevector)
|
(lambda (c-bytevector)
|
||||||
(display "HERE 10: ")
|
|
||||||
(display c-bytevector)
|
|
||||||
(newline)
|
|
||||||
(when (c-null? c-bytevector)
|
(when (c-null? c-bytevector)
|
||||||
(error "Can not turn null pointer into string" c-bytevector))
|
(error "Can not turn null pointer into string" c-bytevector))
|
||||||
(let ((size (c-strlen c-bytevector)))
|
(let ((size (c-strlen c-bytevector)))
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue