Permalink
Switch branches/tags
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
37 lines (31 sloc) 1.27 KB
;; -*- lisp -*-
(eval-when (:compile-toplevel :load-toplevel :execute)
(unless (find-package :access.system)
(defpackage :access.system (:use :common-lisp :asdf))))
(in-package :access.system)
(defsystem :access
:description "A library providing functions that unify data-structure access for Common Lisp:
access and (setf access)"
:licence "BSD"
:author "Acceleration.net, Russ Tyndall, Nathan Bird, Ryan Davis"
:version "1.5.0"
:serial t
:components ((:file "access")
(:file "arg-list-manipulation"))
:depends-on (:iterate :closer-mop :alexandria :anaphora :cl-interpol)
:in-order-to ((test-op (load-op :access-test))))
(defsystem :access-test
:description "Tests for the access library"
:licence "BSD"
:version "1.5.0"
:author "Acceleration.net, Russ Tyndall, Nathan Bird, Ryan Davis"
:serial t
:components ((:module :test
:serial t
:components ((:file "access")
(:file "arg-list-manipulation"))))
:depends-on (:access :lisp-unit2))
(defmethod asdf:perform ((o asdf:test-op) (c (eql (find-system :access))))
(asdf:oos 'asdf:load-op :access-test)
(let ((*package* (find-package :access-test)))
(eval (read-from-string "(run-all-tests)"))))