Fixing stklos
This commit is contained in:
parent
654f8c6e51
commit
ececb7906a
|
|
@ -76,6 +76,8 @@
|
|||
|
||||
(define c-utf8->string
|
||||
(lambda (c-bytevector)
|
||||
(display c-bytevector)
|
||||
(newline)
|
||||
(when (c-null? c-bytevector)
|
||||
(error "Can not turn null pointer into string" c-bytevector))
|
||||
(let ((size (c-strlen c-bytevector)))
|
||||
|
|
|
|||
Loading…
Reference in New Issue