X-Git-Url: http://git.kpe.io/?p=hyperobject.git;a=blobdiff_plain;f=hyperobject.asd;h=711cb74a9cfc2cdb199f67d8669d9b9d96e44087;hp=16e32cc3b759f2e2ee984d7b19c0e409d74cbd74;hb=4cd076b20dcd4d686fb684bdc82b86a9b30acfe0;hpb=549bf52b2dd9f2c4d61cfbd88150a5349715ce6b

diff --git a/hyperobject.asd b/hyperobject.asd
index 16e32cc..711cb74 100644
--- a/hyperobject.asd
+++ b/hyperobject.asd
@@ -4,37 +4,39 @@
 ;;;;
 ;;;; Name:          hyperobject.asd
 ;;;; Purpose:       ASDF system definition for hyperobject package
-;;;; Programmer:    Kevin M. Rosenberg
+;;;; Author:        Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: hyperobject.asd,v 1.19 2003/04/03 17:01:17 kevin Exp $
-;;;;
-;;;; This file is Copyright (c) 2000-2002 by Kevin M. Rosenberg
+;;;; $Id$
 ;;;; *************************************************************************
 
-(in-package :asdf)
+(defpackage hyperobject-system (:use #:asdf #:cl))
+(in-package :hyperobject-system)
 
-#+(or allegro lispworks sbcl cmu scl)
-(defsystem :hyperobject 
-  :name "cl-hyperobject"
+#+(or allegro lispworks sbcl cmu scl openmcl)
+(defsystem hyperobject 
+  :name "hyperobject"
   :author "Kevin M. Rosenberg <kevin@rosenberg.net>"
-  :version "2.6.0"
+  :version "2.7.x"
   :maintainer "Kevin M. Rosenberg <kmr@debian.org>"
   :licence "BSD-like License"
 
-  :perform (load-op :after (op 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"))
-     (:file "wrapper" :depends-on ("base-class"))
-     )
-     :depends-on (:kmrcl :clsql))
+  :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))
+
+#+(or allegro lispworks sbcl cmu scl openmcl)
+(defmethod perform ((o test-op) (c (eql (find-system :hyperobject))))
+  (oos 'load-op 'hyperobject-tests)
+  (oos 'test-op 'hyperobject-tests))
+