3rdparties/software/trivial-garbage-20200325-git/trivial-garbage.asd (1013 bytes)
1 ;;;; -*- Mode: lisp; indent-tabs-mode: nil -*- 2 ;;; 3 ;;; trivial-garbage.asd --- ASDF system definition for trivial-garbage. 4 ;;; 5 ;;; This software is placed in the public domain by Luis Oliveira 6 ;;; <loliveira@common-lisp.net> and is provided with absolutely no 7 ;;; warranty. 8 9 #-(or cmu scl sbcl allegro clisp openmcl corman lispworks ecl abcl clasp) 10 (error "Sorry, your Lisp is not supported by trivial-garbage.") 11 12 (defsystem trivial-garbage 13 :description "Portable finalizers, weak hash-tables and weak pointers." 14 :author "Luis Oliveira <loliveira@common-lisp.net>" 15 :in-order-to ((test-op (test-op "trivial-garbage/tests"))) 16 :licence "Public Domain" 17 :components ((:file "trivial-garbage"))) 18 19 (defsystem trivial-garbage/tests 20 :description "Unit tests for TRIVIAL-GARBAGE." 21 :depends-on (trivial-garbage rt) 22 :components ((:file "tests"))) 23 24 (defmethod perform ((op test-op) 25 (sys (eql (find-system "trivial-garbage/tests")))) 26 (funcall (find-symbol (string '#:do-tests) '#:rtest)))