Re: UFFI evaluation of certain params at macro-expansion time

Oops, never mind. :)

Kenny Tilton wrote:
> I tried to write this code:
> 
> (defun make-foreign-array (type &rest values)
>   (let ((fv (uffi:allocate-foreign-object `(:array ,type)
>                                        (length values))))
>     (dotimes (n (length values) fv)
>       (setf (uffi:deref-array fv `(:array ,type) n) (nth n values)))))
> 
> ...but got into trouble by UFFI evaluating parameters, fell back on ACL 
> FFI thus:
> 
> (defun make-foreign-array (type &rest values)
>   (let ((fv (ff:allocate-fobject `(:array ,type ,(length values)) :c)))
>     (dotimes (n (length values) fv)
>       (setf (ff:fslot-value-typed `(:array ,type) :c fv n)
>            (nth n values)))))
> 
> I don't know the issues very well so maybe there is a reason UFFI cannot 
> support the code I attempted, but I thought I'd mention it in case it 
> could.
> 
> 


-- 

  kenny tilton
  clinisys, inc
  http://www.tilton-technology.com/
  ---------------------------------------------------------------
"Cells let us walk, talk, think, make love and realize
  the bath water is cold." -- Lorraine Lee Cudmore