trivial-backtrace.asd

   1 (in-package #:common-lisp-user)
   2
   3 (defpackage #:trivial-backtrace-system (:use #:asdf #:cl))
   4 (in-package #:trivial-backtrace-system)
   5
   6 (defsystem trivial-backtrace
   7   :version "1.0.2"
   8   :author "Gary Warren King <gwking@metabang.com>"
   9   :maintainer "Gary Warren King <gwking@metabang.com>"
  10   :licence "MIT Style license "
  11   :description "trivial-backtrace"
  12   :depends-on ()
  13   :components
  14   ((:static-file "COPYING")
  15    (:module
  16     "setup"
  17     :pathname "dev/"
  18     :components ((:file "packages")))
  19    (:module
  20     "dev"
  21     :depends-on ("setup")
  22     :components ((:file "utilities")
  23                  (:file "backtrace"))))
  24   :in-order-to ((test-op (load-op trivial-backtrace-test)))
  25   :perform (test-op :after (op c)
  26                     (funcall
  27                      (intern (symbol-name '#:run-tests) :lift)
  28                      :config :generic)))
  29
  30 (defmethod operation-done-p
  31            ((o test-op)
  32             (c (eql (find-system 'trivial-backtrace))))
  33   (values nil))