Retropikzel
/
foreign-c
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixing stklos

This commit is contained in:
retropikzel 2025-08-05 08:19:51 +03:00
parent 94ca5eb158
commit 1e1f8479db
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
foreign/c/pointer.scm
View File

@ -78,7 +78,7 @@
(lambda (c-bytevector) (lambda (c-bytevector)
(display c-bytevector) (display c-bytevector)
(newline) (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)))
(utf8->string (c-bytevector->bytevector c-bytevector size))))) (utf8->string (c-bytevector->bytevector c-bytevector size)))))