X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fmetaclasses.lisp;h=edb794298f3d374b088409c6e361185f592db15c;hb=f246c3c7b48792a869cb1bae0637a2f00a0920bd;hp=082b1d3c111079a487953b643751d1ad5a8cd231;hpb=2d4e5fd3f01bd461e573e246c0fd9b6a944d8e5a;p=clsql.git

diff --git a/sql/metaclasses.lisp b/sql/metaclasses.lisp
index 082b1d3..edb7942 100644
--- a/sql/metaclasses.lisp
+++ b/sql/metaclasses.lisp
@@ -60,9 +60,11 @@
 			       :db-writer :db-info))
 (defvar +extra-class-options+ '(:base-table))
 
+#+lispworks
 (dolist (slot-option +extra-slot-options+)
   (process-slot-option standard-db-class slot-option))
 
+#+lispworks
 (dolist (class-option +extra-class-options+)
   (process-class-option standard-db-class class-option))