diff --git a/foreign/c/pointer.scm b/foreign/c/pointer.scm index f9c490f..ed82702 100644 --- a/foreign/c/pointer.scm +++ b/foreign/c/pointer.scm @@ -76,7 +76,7 @@ (define c-utf8->string (lambda (c-bytevector) - #;(when (c-null? c-bytevector) + (when (c-null? c-bytevector) (error "Can not turn null pointer into string")) (let ((size (c-strlen c-bytevector))) (utf8->string (c-bytevector->bytevector c-bytevector size)))))