File: iterate.asd

package info (click to toggle)
cl-iterate 20160825-1
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 852 kB
  • sloc: lisp: 3,865; sh: 238; makefile: 28
file content (16 lines) | stat: -rw-r--r-- 632 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
;;; -*- lisp -*- system definition

(defsystem :iterate
  :description "Jonathan Amsterdam's iterator/gatherer/accumulator facility"
  :licence "MIT"
  :in-order-to ((test-op (test-op :iterate/tests)))
  :components ((:file "package")
               (:file "iterate" :depends-on ("package"))))

(defsystem :iterate/tests
  :depends-on (:iterate #+sbcl :sb-rt #-sbcl :rt)
  :components ((:file "iterate-test")))

(defmethod perform ((operation test-op) (component (eql (find-system :iterate/tests))))
  (funcall (intern "DO-TESTS" (find-package #+sbcl "SB-RT"
                                            #-sbcl "REGRESSION-TEST"))))