[cffi-devel] def-foreign-type and with-foreign-object

[Luis Oliveira]

Hello again, :-)

On 4/nov/2005, at 12:05, Yaroslav Kavenchuk wrote:
> (defun %new-db-connection-handle (henv)
>   (with-foreign-object (phdbc 'sql-handle)
>     (setf (deref-pointer phdbc sql-handle) +null-handle-ptr+)

This is clearly a bug in this clsql code. That should be (deref-pointer 
phdbc 'sql-handle), note the missing quote.

>     (with-error-handling
>       (:henv henv)
>       (SQLAllocHandle $SQL_HANDLE_DBC henv phdbc)
>       (deref-pointer phdbc 'sql-handle))))

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