X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fmetaclasses.lisp;h=5586dab79ef6dfaded6412645bd7bdfb971f8a46;hb=cab6bc9726ec3399ec79fe53522e0b90912b750f;hp=f981c900be363b18be8e67cd8db6895e800d465e;hpb=5953db07cc2276392d0a81052d2d8c71d3252b5a;p=clsql.git diff --git a/sql/metaclasses.lisp b/sql/metaclasses.lisp index f981c90..5586dab 100644 --- a/sql/metaclasses.lisp +++ b/sql/metaclasses.lisp @@ -362,7 +362,7 @@ column definition in the database.") (defun compute-class-precedence-list (class) (class-precedence-list class)))) -#-(or sbcl cmu) +#-(or sbcl cmu18) (defmethod compute-slots ((class standard-db-class)) "Need to sort order of class slots so they are the same across implementations."