From 9c6f7a6f3559a32d75d15c3ae9d31b0db0e2acb3 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Tue, 29 Apr 2003 01:35:58 +0000 Subject: [PATCH] r4672: Auto commit for Debian build --- attrib-class.lisp | 10 ++++++---- debian/changelog | 7 +++++++ 2 files changed, 13 insertions(+), 4 deletions(-) diff --git a/attrib-class.lisp b/attrib-class.lisp index 1c15e34..02bfb45 100644 --- a/attrib-class.lisp +++ b/attrib-class.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: attrib-class.lisp,v 1.6 2003/04/28 23:51:59 kevin Exp $ +;;;; $Id: attrib-class.lisp,v 1.7 2003/04/29 01:35:58 kevin Exp $ ;;;; ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -41,9 +41,11 @@ on example from AMOP")) (superclass kmr-mop:standard-class)) t) -(defmethod kmr-mop:direct-slot-definition-class ((cl attributes-class) - &rest iargs &key attributes) - (declare (ignore attributes)) +(defmethod kmr-mop:direct-slot-definition-class ((cl attributes-class) + #+(or sbcl cmu scl lispworks) + initargs + #+(or allegro) + &rest iargs) ;; (format t "attributes:~s iargs:~s~%" attributes iargs) (kmr-mop:find-class 'attributes-dsd)) diff --git a/debian/changelog b/debian/changelog index 075394f..9acc888 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,10 @@ +cl-kmrcl (1.32-1) unstable; urgency=low + + * Vary signature of DIRECT-SLOT-DEFINITION-CLASS depending on + implementation + + -- Kevin M. Rosenberg Mon, 28 Apr 2003 19:35:37 -0600 + cl-kmrcl (1.31-1) unstable; urgency=low * New upstream -- 2.34.1