For example: from (defun pointer-eq (ptr1 ptr2) "Return true if PTR1 and PTR2 point to the same address." (sb-sys:sap= ptr1 ptr2))
to (declaim (inline pointer-eq)) (defun pointer-eq (ptr1 ptr2) "Return true if PTR1 and PTR2 point to the same address." (declare (type system-area-pointer ptr1 ptr2)) (sb-sys:sap= ptr1 ptr2)) This is need? Do it? And for other files? Thanks! -- WBR, Yaroslav Kavenchuk. _______________________________________________ cffi-devel mailing list cffi-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/cffi-devel