-(when (ignore-errors (find-class 'load-compiled-op))
- (defmethod perform :after ((op load-compiled-op)
- (c (eql (find-system :hyperobject))))
- (pushnew :hyperobject cl:*features*)))
+ :components
+ ((:file "package")
+ (:file "metaclass" :depends-on ("package"))
+ (:file "mop" :depends-on ("metaclass"))
+ (:file "rules" :depends-on ("mop"))
+ (:file "connect" :depends-on ("mop"))
+ (:file "sql" :depends-on ("connect"))
+ (:file "views" :depends-on ("mop"))
+ (:file "base-class" :depends-on ("views" "sql" "rules"))
+ )
+ :depends-on (:kmrcl :clsql))