[cffi-devel] small bag in cffi-uffi-compat

[Luís Oliveira]

On 2005-dec-11, at 13:27, Леонид Новиков wrote:
> I have found small mistake in cffi-uffi-compat:
>
> CL-USER> (cffi-uffi-compat:def-struct g-value
>     (g-type (:array :int 16)))
> G-VALUE
>
> CL-USER> (cffi-uffi-compat::convert-uffi-type 'g-value)
> G-VALUE
>
> CL-USER> (cffi-uffi-compat::convert-uffi-type '(:array 'g-value))
> (CFFI-UFFI-COMPAT::UFFI-ARRAY NIL NIL)
>
> Last call was to return: (CFFI-UFFI-COMPAT::UFFI-ARRAY G-VALUE NIL)


привет Леонид!

The type should be (:array g-value) not (:array (quote g-value))

(cffi-uffi-compat::convert-uffi-type '(:array g-value))
   => (CFFI-UFFI-COMPAT::UFFI-ARRAY G-VALUE NIL)

cffi-uffi-compat:size-of-foreign-type on that type wouldn't work, but  
UFFI users wouldn't notice that since the real uffi:size-of-foreign- 
type is broken anyway. This is fixed now anyway.

Thanks,

-- 
Luís Oliveira
http://student.dei.uc.pt/~lmoliv/
Equipa Portuguesa do Translation Project
http://www.iro.umontreal.ca/translation/registry.cgi?team=pt