diff --git a/foreign/c/pointer.scm b/foreign/c/pointer.scm index 16ed729..5cde6ec 100644 --- a/foreign/c/pointer.scm +++ b/foreign/c/pointer.scm @@ -78,7 +78,7 @@ (lambda (c-bytevector) (display c-bytevector) (newline) - (when (c-null? c-bytevector) + #;(when (c-null? c-bytevector) (error "Can not turn null pointer into string" c-bytevector)) (let ((size (c-strlen c-bytevector))) (utf8->string (c-bytevector->bytevector c-bytevector size)))))