<html><head><meta http-equiv="Content-Type" content="text/html charset=windows-1252"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; ">Hi,<div><br></div><div>I'm back in the land of the living… ;)</div><div><br></div><div>And I have two bugs to report:</div><div><br></div><div>- Previously, ECL had a way of specifying :optimize-slot-access for classes to state whether slot access should go through the CLOS MOP slot access functions or should be optimized. Judging from the source code for ECL, this is still supposed to be supported, but it seems that the defclass macro, or some level in between before shared-initialize cannot handle this option anymore.</div><div><br></div><div>- It seems that slot-unbound is not correctly handled. Here is a test case:</div><div><br></div><div><div>> (use-package :clos)</div><div><br></div><div>T</div><div>> (defclass my-class (standard-class) () ())</div><div><br></div><div>#<The STANDARD-CLASS COMMON-LISP-USER::MY-CLASS></div><div>> (defmethod validate-superclass ((class my-class) (class standard-class)) t)</div><div><br></div><div>#<standard-method VALIDATE-SUPERCLASS (#<The STANDARD-CLASS COMMON-LISP-USER::MY-CLASS></div><div> #<The STANDARD-CLASS STANDARD-CLASS>)></div><div>> (defmethod slot-unbound ((class my-class) object slot-name)</div><div> (print :unbound) (print slot-name) (call-next-method))</div><div><br></div><div>#<standard-method SLOT-UNBOUND (#<The STANDARD-CLASS COMMON-LISP-USER::MY-CLASS></div><div> #<The BUILT-IN-CLASS T> #<The BUILT-IN-CLASS T>)></div><div>> (defclass person () (name employer) (:metaclass my-class))</div><div><br></div><div>#<The COMMON-LISP-USER::MY-CLASS COMMON-LISP-USER::PERSON></div><div>> (defvar *p* (make-instance 'person))</div><div><br></div><div>*P*</div><div>> (slot-value *p* 'name)</div><div><br></div><div>SI:UNBOUND</div></div><div><br></div><div><br></div><div>Best,</div><div>Pascal</div><div><br><div><div>On 12 Oct 2012, at 12:53, Juan Jose Garcia-Ripoll <<a href="mailto:juanjose.garciaripoll@gmail.com">juanjose.garciaripoll@gmail.com</a>> wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite">I have uploaded a set of changes that turn the last set of accessors into true generic functions. There were also some optimizations in the implementation of accessors.<div><br></div><div>The patches attached seem to make closer-mop build with ECL at least sufficiently well as to allow ContextL also to build. Closer-mop tests' also run fine, though they also did in the past, so it is no real check.</div>
<div><br></div><div>Just to be sure, this is the last patch I am uploading right now</div><div><br></div><div><div>commit bca1f4053a039ee65aaf5dde4c39d3ceccc1bf91</div><div>Author: Juan Jose Garcia Ripoll <<a href="mailto:jjgarcia@users.sourceforge.net">jjgarcia@users.sourceforge.net</a>></div>
<div>Date: Fri Oct 12 12:14:27 2012 +0200</div><div><br></div><div> All accessors are now generic functions, including slot definition's ones</div></div><div><br></div><div><br></div><div>Juanjo<br clear="all"><div>
<br></div>-- <br>Instituto de Física Fundamental, CSIC<br>c/ Serrano, 113b, Madrid 28006 (Spain) <br><a href="http://juanjose.garciaripoll.googlepages.com/" target="_blank">http://juanjose.garciaripoll.googlepages.com</a><br>
</div>
<span><closer.diff></span></blockquote></div><br><div>
<span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px; "><div>--</div><div>Pascal Costanza</div><div><br></div></span><br class="Apple-interchange-newline">
</div>
<br></div></body></html>