deref-pointer

John DeSoi <[email protected]> Fri, 29 Mar 2002 09:50:54 -0500
Newsgroups gmane.lisp.uffi.devel
Message-ID <p04330100b8ca2e62fb2c@[192.168.1.6]>
Should this use convert-from-uffi-type? Seems like it should.


Thanks,


John DeSoi, Ph.D.




(defmacro deref-pointer (ptr type)
   "Returns a object pointed"
   #+(or cmu lispworks) (declare (ignore type))
   #+cmu  `(alien:deref ,ptr)
   #+lispworks `(fli:dereference ,ptr)
   #+allegro `(ff:fslot-value-typed ,type :c ,ptr)
)