[cl-unification-cvs] CVS cl-unification

[rbrown]

Update of /project/cl-unification/cvsroot/cl-unification
In directory cl-net:/tmp/cvs-serv17076

Modified Files:
	cl-unification.asd 
Added Files:
	cl-unification-test.asd 
Log Message:
Add cl-unification-test.asd
Make (asdf:test-system 'cl-unification) work.


--- /project/cl-unification/cvsroot/cl-unification/cl-unification.asd	2009/04/17 22:42:46	1.3
+++ /project/cl-unification/cvsroot/cl-unification/cl-unification.asd	2011/02/16 16:22:57	1.4
@@ -16,6 +16,7 @@
 
 (asdf:defsystem :cl-unification
   :author "Marco Antoniotti"
+  :in-order-to ((test-op (test-op :cl-unification-test)))
   :serial t
   :components ((:file "unification-package")
                (:file "variables")

--- /project/cl-unification/cvsroot/cl-unification/cl-unification-test.asd	2011/02/16 16:22:57	NONE
+++ /project/cl-unification/cvsroot/cl-unification/cl-unification-test.asd	2011/02/16 16:22:57	1.1

;;;;    cl-unification-test.asd


(in-package #:asdf)

;; Tests implemented using the ptester framework are run at *load* time, so
;; we tell ASDF that loading a file containing ptester code is never done.
;; This causes ASDF to run all the tests whenever ASDF:LOAD-SYSTEM or
;; ASDF:TEST-SYSTEM is called with argument CL-UNIFICATION-TEST.

(defclass ptester-source-file (cl-source-file)
  ()
  (:documentation "A Common Lisp source file containing ptester code."))

(defmethod operation-done-p ((operation load-op) (component ptester-source-file))
  nil)


(in-package #:common-lisp-user)

(defpackage #:cl-unification-test-system
  (:use #:common-lisp #:asdf))

(in-package #:cl-unification-test-system)

(defsystem #:cl-unification-test
  :depends-on (:cl-unification :ptester)
  :components
  ((:module "test"
    :components
    ((:ptester-source-file "unification-tests")))))