diff --git a/tests/hello.scm b/tests/hello.scm index b8a1374..dc3b997 100644 --- a/tests/hello.scm +++ b/tests/hello.scm @@ -3,5 +3,5 @@ (foreign c)) (define-c-procedure c-puts libc 'puts 'int '(pointer)) -(c-puts "Hello from C!") +(c-puts (string->c-utf8 "Hello from C!"))