6 Sep
2010
6 Sep
'10
9:18 p.m.
2010/8/23 Gustavo <gugamilare@gmail.com>:
Those don't fail, but:
UFFI-TESTS> (let ((native-string "test string")) (uffi:with-foreign-string (fs native-string) (ensure-char-character (deref-pointer fs :char)))) #\t UFFI-TESTS> (let ((native-string "test string")) (uffi:with-foreign-string (fs native-string) (deref-pointer fs :char))) 116
The latter would return #\t in uffi-compat.
Thanks for investigating this issue. I've applied your fix. Cheers, -- Luís Oliveira http://r42.eu/~luis/