`(alien:make-alien ,(convert-from-uffi-type (eval type) :allocation) ,size)
#+sbcl
`(sb-alien:make-alien ,(convert-from-uffi-type (eval type) :allocation) ,size)
#+lispworks
`(fli:allocate-foreign-object :type ',(convert-from-uffi-type type :allocate) :nelems ,size)
#+allegro
`(alien:make-alien ,(convert-from-uffi-type (eval type) :allocation) ,size)
#+sbcl
`(sb-alien:make-alien ,(convert-from-uffi-type (eval type) :allocation) ,size)
#+lispworks
`(fli:allocate-foreign-object :type ',(convert-from-uffi-type type :allocate) :nelems ,size)
#+allegro