On 4/1/06, Ken Tilton kentilton@gmail.com wrote:
On 4/1/06, Jack Unrue jdunrue@gmail.com wrote:
Hello Kenny,
As of CLISP 2.38 (if not earlier, I haven't checked), the #+clisp defun for slot-definition-name is no longer necessary.
Aha! I spotted that when cleaning up the code and had a feeling it could go. Thanks for the patch.
Sorry I didn't catch this before, but you also need these changes for clisp (also tested on LW):
=================================================================== RCS file: /project/cells/cvsroot/cells/model-object.lisp,v retrieving revision 1.4 diff -r1.4 model-object.lisp 53c53 < for sn = (slot-definition-name esd) ---
for sn = (clos::slot-definition-name esd)
115,116c115,116 < (when (md-slot-cell-type (type-of self) (slot-definition-name esd)) < (let* ((slot-name (slot-definition-name esd)) ---
(when (md-slot-cell-type (type-of self) (clos::slot-definition-name esd)) (let* ((slot-name (clos::slot-definition-name esd))
=================================================================== RCS file: /project/cells/cvsroot/cells/cells-test/test.lisp,v retrieving revision 1.4 diff -r1.4 test.lisp 228c228 < for sn = (slot-definition-name esd) ---
for sn = (clos::slot-definition-name esd)
-- Jack Unrue