hyperobject.asd

   1 ;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*-
   2 ;;;; *************************************************************************
   3 ;;;; FILE IDENTIFICATION
   4 ;;;;
   5 ;;;; Name:          hyperobject.asd
   6 ;;;; Purpose:       ASDF system definition for hyperobject package
   7 ;;;; Programmer:    Kevin M. Rosenberg
   8 ;;;; Date Started:  Apr 2000
   9 ;;;;
  10 ;;;; $Id: hyperobject.asd,v 1.21 2003/04/28 16:07:11 kevin Exp $
  11 ;;;;
  12 ;;;; This file is Copyright (c) 2000-2002 by Kevin M. Rosenberg
  13 ;;;; *************************************************************************
  14
  15 (in-package :asdf)
  16
  17 #+(or allegro lispworks sbcl cmu scl)
  18 (defsystem hyperobject
  19   :name "cl-hyperobject"
  20   :author "Kevin M. Rosenberg <kevin@rosenberg.net>"
  21   :version "2.6.x"
  22   :maintainer "Kevin M. Rosenberg <kmr@debian.org>"
  23   :licence "BSD-like License"
  24
  25   :components
  26   ((:file "package")
  27    (:file "metaclass" :depends-on ("package"))
  28    (:file "mop" :depends-on ("metaclass"))
  29    (:file "rules" :depends-on ("mop"))
  30    (:file "connect" :depends-on ("mop"))
  31    (:file "sql" :depends-on ("connect"))
  32    (:file "views" :depends-on ("mop"))
  33    (:file "base-class" :depends-on ("views" "sql" "rules"))
  34    (:file "wrapper" :depends-on ("base-class"))
  35    )
  36   :depends-on (:kmrcl :clsql))
  37
  38 (defmethod perform ((o test-op) (c (eql (find-system :hyperobject))))
  39   (oos 'load-op 'hyperobject-tests)
  40   (oos 'test-op 'hyperobject-tests))
  41
  42 (defsystem hyperobject-tests
  43     :depends-on (rt)
  44     :components ((:file "tests")))
  45
  46 (defmethod perform ((o test-op) (c (eql (find-system :sb-aclrepl-tests))))
  47   (or (funcall (intern (symbol-name '#:do-tests)
  48                        (find-package '#:sb)))
  49       (error "test-op failed")))