refactor: simplify way to create new tests

Now it's only necessary create a file test-*.lisp in t/ folder.

ASDF will take care to declare all the relevant files properly in
defsystem, no t/tests.lisp index are more necessary, defpackage of
tests was moved to each test file.

Author: ryukinix

lisp-inference.asd

@@ -1,10 +1,21 @@
 ;; -*- mode: lisp  -*-
 ;; Manoel Vilela
 
+
 ;;;; lisp-inference.asd
 
+(defpackage :lisp-inference/system
+  (:use :cl :uiop :asdf))
+
+(in-package :lisp-inference/system)
+
+(defun get-all-test-files ()
+  (mapcar #'(lambda (p) (list :file (pathname-name p)))
+          (directory-files (system-relative-pathname :lisp-inference "t/")
+                           "*test*.lisp")))
 
-(asdf:defsystem #:lisp-inference
+
+(defsystem #:lisp-inference
   :description "An Inference Engine using Propositional Calculus"
   :author "Manoel Vilela <[email protected]>"
   :license "BSD"
@@ -23,7 +34,7 @@
                (:file "truth-table"
                 :depends-on ("pratt" "parser" "operators" "equivalences"))))
 
-(asdf:defsystem #:lisp-inference/web
+(defsystem #:lisp-inference/web
   :description "An web interface for Lisp Inference Truth Table"
   :author "Manoel Vilela <[email protected]>"
   :license "BSD"
@@ -41,20 +52,15 @@
   :pathname "web"
   :components ((:file "webapp")))
 
-(asdf:defsystem #:lisp-inference/tests
+(defsystem #:lisp-inference/tests
   :description "Lisp Inference Tests"
   :author "Manoel Vilela <[email protected]>"
   :license "BSD"
   :version "0.4.0"
   :homepage "https://github.com/ryukinix/lisp-inference"
   :serial t
-  :pathname "t"
   :depends-on (:lisp-inference :rove)
-  :components ((:file "tests")
-               (:file "test-equivalence-rules")
-               (:file "test-inference-rules")
-               (:file "test-infix-parsing")
-               (:file "test-truth-table")
-               (:file "test-pratt"))
+  :pathname "t"
+  :components #.(get-all-test-files)
   :perform (test-op (o c)
                     (symbol-call :rove :run c)))

t/test-equivalence-rules.lisp

@@ -1,3 +1,8 @@
+(defpackage #:lisp-inference/tests/test-equivalence-rules
+  (:use #:cl
+        #:lisp-inference
+        #:rove))
+
 (in-package #:lisp-inference/tests/test-equivalence-rules)
 
 (deftest test-equivalence-rules

t/test-inference-rules.lisp

@@ -1,3 +1,8 @@
+(defpackage #:lisp-inference/tests/test-inference-rules
+  (:use #:cl
+        #:lisp-inference
+        #:rove))
+
 (in-package #:lisp-inference/tests/test-inference-rules)
 
 

t/test-infix-parsing.lisp

@@ -1,3 +1,8 @@
+(defpackage #:lisp-inference/tests/test-infix-parsing
+  (:use #:cl
+        #:lisp-inference
+        #:rove))
+
 (in-package #:lisp-inference/tests/test-infix-parsing)
 
 ;; deprecated in favor of pratt parser

t/test-pratt.lisp

@@ -1,3 +1,9 @@
+(defpackage #:lisp-inference/tests/test-pratt
+  (:use #:cl
+        #:lisp-inference
+        #:rove))
+
+
 (in-package #:lisp-inference/tests/test-pratt)
 
 (deftest test-pratt

t/test-truth-table.lisp

@@ -1,3 +1,9 @@
+(defpackage #:lisp-inference/tests/test-truth-table
+  (:use #:cl
+        #:lisp-inference
+        #:rove))
+
+
 (in-package :lisp-inference/tests/test-truth-table)
 
 (deftest truth-table-tests