cxml-stp.asd

   1 (defpackage :cxml-stp-system
   2   (:use :asdf :cl))
   3 (in-package :cxml-stp-system)
   4
   5 (defclass closure-source-file (cl-source-file) ())
   6
   7 #+sbcl
   8 (defmethod perform :around ((o compile-op) (s closure-source-file))
   9   ;; shut up already.  Correctness first.
  10   (handler-bind ((sb-ext:compiler-note #'muffle-warning))
  11     (let ((*compile-print* nil))
  12       (call-next-method))))
  13
  14 (defsystem :cxml-stp
  15     :default-component-class closure-source-file
  16     :serial t
  17     :components
  18     ((:file "package")
  19      (:file "classes")
  20      (:file "node")
  21      (:file "parent-node")
  22      (:file "leaf-node")
  23      (:file "document")
  24      (:file "element")
  25      (:file "attribute")
  26      (:file "document-type")
  27      (:file "comment")
  28      (:file "processing-instruction")
  29      (:file "text")
  30      (:file "builder")
  31      (:file "xpath"))
  32     :depends-on (:cxml :alexandria :xpath))
  33
  34 (defsystem :cxml-stp-test
  35     :default-component-class closure-source-file
  36     :serial t
  37     :components
  38     ((:file "test"))
  39     :depends-on (:cxml-stp :rt))