Hi again, The following triggers an incorrect error for me. Not a major bug since the third case provides a workaround.
(defclass FOO () ((bar :col-type real)) (:metaclass dao-class) (:keys baz)) (dao-table-definition 'foo) ;; correct error. ;; redefine: (defclass FOO () ((bar :col-type real)) (:metaclass dao-class)) ;; incorrect error! ;; redefine: (defclass FOO () ((bar :col-type real)) (:metaclass dao-class) (:keys bar)) ;; works, then can run the second defclass successfully. -Luke _______________________________________________ postmodern-devel mailing list postmodern-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/postmodern-devel
