2010/8/23 Gustavo <gugamil...@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/ _______________________________________________ cffi-devel mailing list cffi-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/cffi-devel