From 48720858048d54c9ff6b79dbce56549d01e452d1 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Thu, 19 Aug 2004 19:04:59 +0000 Subject: [PATCH] r9902: * sql/metaclasses.lisp: Fix inline declaration (reported by Cyrus Harmon) --- sql/metaclasses.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/sql/metaclasses.lisp b/sql/metaclasses.lisp index 7980e32..bb02da3 100644 --- a/sql/metaclasses.lisp +++ b/sql/metaclasses.lisp @@ -423,7 +423,7 @@ which does type checking before storing a value in a slot." (car list) list)) -(declaim (inline delistify)) +(declaim (inline delistify-dsd)) (defun delistify-dsd (list) "Some MOPs, like openmcl 0.14.2, cons attribute values in a list." (if (and (listp list) (null (cdr list))) -- 2.34.1