X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fooddl.lisp;h=79f6186a65b55caeebd30eef9575033717a4830b;hp=fe201eb4c8e71a8318c225cdc9c87c2ee813ff53;hb=dc86bc45222a39ff2c977bdd8c0992940ac72385;hpb=510b3d1d2d18c73ca222fce2b711f1b2f5025ba0 diff --git a/sql/ooddl.lisp b/sql/ooddl.lisp index fe201eb..79f6186 100644 --- a/sql/ooddl.lisp +++ b/sql/ooddl.lisp @@ -22,8 +22,9 @@ (:documentation "Superclass for all CLSQL View Classes.")) #+clisp (eval-when (:compile-toplevel :load-toplevel :execute) - (make-instance 'standard-db-object) - (finalize-inheritance (find-class 'standard-db-object))) + (make-instance 'standard-db-object) ;; clisp requires a made object before can use in this file + #+nil (finalize-inheritance (find-class 'standard-db-object)) ;; this is not sufficient + ) (defparameter *default-string-length* 255 "The length of a string which does not have a user-specified length.")