r9182: add missing extra-slot-option

diff --git a/sql/metaclasses.lisp b/sql/metaclasses.lisp
index aafd3f4120e5eee65980599b487cf7c3074ced6a..95b9c11ed6c5a14993548c740af2169ca89a3a26 100644 (file)
--- a/sql/metaclasses.lisp
+++ b/sql/metaclasses.lisp
@@ -56,7 +56,7 @@
 
 ;;; Lispworks 4.2 and before requires special processing of extra slot and class options
 
 
 ;;; Lispworks 4.2 and before requires special processing of extra slot and class options
 

-(defconstant +extra-slot-options+ '(:column :db-kind :db-reader :nulls-ok
+(defconstant +extra-slot-options+ '(:column :db-kind :db-reader :nulls-ok :db-constraints

                                    :db-writer :db-type :db-info))
 (defconstant +extra-class-options+ '(:base-table))
 
                                    :db-writer :db-type :db-info))
 (defconstant +extra-class-options+ '(:base-table))