flatten directory structure to appease dr koebbe

1 files changed, 0 insertions, 31 deletions

diff --git a/tests/table.lisp b/tests/table.lisp
deleted file mode 100644
index 33d4e86..0000000
--- a/tests/table.lisp
+++ /dev/null
@@ -1,31 +0,0 @@
-(defpackage lizfcm/tests.table
-  (:use :cl
-        :fiveam
-        :lizfcm.utils
-        :lizfcm/tests)
-  (:export :approx-suite))
-(in-package :lizfcm/tests.table)
-
-(def-suite table-suite
-           :in lizfcm-test-suite)
-(in-suite table-suite)
-
-(defun fib (n)
-  (cond ((< n 2) n)
-        (t (+ (fib (- n 1)) (fib (- n 2))))))
-
-(test table-of-fib-vals
-      :description "table generates correctly"
-      (let* ((headers '("n" "fib(n)"))
-             (n-values '((1) (2) (3) (4)))
-             (expected `(("n" "fib(n)")
-                         (1 ,(fib 1))
-                         (2 ,(fib 2))
-                         (3 ,(fib 3))
-                         (4 ,(fib 4))))
-             (tabled (lizfcm.utils:table (:headers headers
-                                                   :domain-order (n)
-                                                   :domain-values n-values)
-                                         (fib n))))
-        (is (equal expected tabled))))
-