try/try.asd at master · melisgl/try · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
;;;; -*- mode: Lisp -*-

;;; See TRY::@TRY-MANUAL for the user guide.
(asdf:defsystem :try
  :licence "MIT, see COPYING."
  :version (:read-file-form "version.lisp-expr")
  :author "Gábor Melis"
  :mailto "mega@retes.hu"
  :homepage "http://github.com/melisgl/try"
  :bug-tracker "https://github.com/melisgl/try/issues"
  :source-control (:git "https://github.com/melisgl/try.git")
  :description "Try is an extensible test framework with equal support
  for interactive and non-interactive workflows."
  :long-description "Try stays as close to normal Lisp evaluation
  rules as possible. Tests are functions that record the checks they
  perform as events. These events provide the means of customization
  of what to debug, print or rerun. There is a single fundamental
  check, the extensible IS macro. Everything else is built on top."
  :depends-on ("alexandria" "cl-ppcre" "closer-mop" "ieee-floats" "mgl-pax"
               "trivial-gray-streams" "uiop")
  ;; We compile each file in a separate compilation units (even though
  ;; they are all nested in another WITH-COMPILATION-UNIT) to get
  ;; warnings about forward references from one file to a later one.
  :around-compile (lambda (thunk)
                    (with-compilation-unit (:override t)
                      (funcall thunk)))
  :components ((:module "src/"
                :serial t
                :components ((:file "package")
                             (:file "util")
                             (:file "gray-stream")
                             (:file "early")
                             (:file "debug")
                             (:file "events")
                             (:file "outcome")
                             (:file "result")
                             (:file "is")
                             (:file "checks")
                             (:file "floats")
                             (:file "trial-event")
                             (:file "error")
                             (:file "count")
                             (:file "trial")
                             (:file "test")
                             (:file "testable")
                             (:file "rerun")
                             (:file "print")
                             (:file "collect")
                             (:file "try")
                             (:file "replay")
                             (:file "manual")
                             (:file "doc"))))
  :in-order-to ((asdf:test-op (asdf:test-op "try/test"))))

(asdf:defsystem :try/test
  :licence "MIT, see COPYING."
  :author "Gábor Melis"
  :mailto "mega@retes.hu"
  :description "Test system for TRY."
  :depends-on ("try" (:feature :sbcl "mgl-pax/document"))
  :components ((:module "test"
                :serial t
                :components ((:file "package")
                             (:file "util")
                             (:file "test-util")
                             (:file "test-is")
                             (:file "test-checks")
                             (:file "test-floats")
                             (:file "test-trial")
                             (:file "test-try")
                             (:file "test-rerun")
                             (:file "test-count")
                             (:file "test"))))
  :perform (asdf:test-op (o s)
             (uiop:symbol-call '#:try-test '#:test)))