Browse code
fix: use correct string encoding
(note, this is still a bit dangerous, I assum CFFI is usign utf-8 for
its foreign encoding)
Showing 1 changed files
... | ... |
@@ -221,7 +221,7 @@ |
221 | 221 |
|
222 | 222 |
|
223 | 223 |
(defun make-nsstring (str) |
224 |
- [[#@NSString @(alloc)] @(initWithCString:encoding:) :string str :uint 1]) |
|
224 |
+ [[#@NSString @(alloc)] @(initWithCString:encoding:) :string str :uint 4]) |
|
225 | 225 |
|
226 | 226 |
(defun extract-nsstring (ns-str) |
227 | 227 |
[ns-str @(UTF8String)]s) |