X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=package.lisp;fp=package.lisp;h=71630b20b6529c9d4f507f84b0c0aa1814af61c5;hb=a6f1352130e8906bdf107dc24c01b5958ea8a979;hp=f23c72e7a6a739bd0eea4b750edd63c556993cb7;hpb=a4c5cb60bc8a39d7907e0c380db2d3d29f1df3af;p=hyperobject.git diff --git a/package.lisp b/package.lisp index f23c72e..71630b2 100644 --- a/package.lisp +++ b/package.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: package.lisp,v 1.46 2003/05/14 05:29:48 kevin Exp $ +;;;; $Id: package.lisp,v 1.47 2003/05/15 06:30:19 kevin Exp $ ;;;; ;;;; This file is Copyright (c) 2000-2003 by Kevin M. Rosenberg ;;;; ************************************************************************* @@ -73,7 +73,8 @@ sb-pcl::compute-effective-slot-definition-initargs sb-pcl::slot-value-using-class sb-pcl:class-prototype sb-pcl:generic-function-method-class sb-pcl:intern-eql-specializer - sb-pcl:make-method-lambda sb-pcl:generic-function-lambda-list) + sb-pcl:make-method-lambda sb-pcl:generic-function-lambda-list + sb-pcl::class-precedence-list) #+kmr-cmucl-mop '(pcl::compute-effective-slot-definition-initargs) #+kmr-cmucl-pcl @@ -85,7 +86,8 @@ pcl::compute-effective-slot-definition-initargs pcl::slot-value-using-class pcl:class-prototype pcl:generic-function-method-class pcl:intern-eql-specializer - pcl:make-method-lambda pcl:generic-function-lambda-list) + pcl:make-method-lambda pcl:generic-function-lambda-list + pcl::class-precedence-list) #+scl '(clos::compute-effective-slot-definition-initargs clos::class-prototype