X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=equal.lisp;h=d9472bc2cd11de80d6d9c621be66d60e4ef4d1ae;hp=c621fd44bdde39515909ca726f00620fd105a697;hb=321bceb4c33dc585c53e297b8e90d9ac926a6284;hpb=6007424292e8d78977bc90bcc29a20d4451cfa41 diff --git a/equal.lisp b/equal.lisp index c621fd4..d9472bc 100644 --- a/equal.lisp +++ b/equal.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: equal.lisp,v 1.10 2003/03/25 05:27:55 kevin Exp $ +;;;; $Id: equal.lisp,v 1.11 2003/03/25 06:50:38 kevin Exp $ ;;;; ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -135,7 +135,7 @@ (error "structure-slot-names is not defined on this platform") ) - +#+sbcl (eval-when (:compile-toplevel :load-toplevel :execute) (if (find-package 'sb-mop) (setq cl:*features* (delete :sb-mop cl:*features*))