From 253807763840392a55f16c2c0aa9f161a4748d02 Mon Sep 17 00:00:00 2001
From: Aryadev Chavali <aryadev@aryadevchavali.com>
Date: Fri, 21 Feb 2025 13:57:45 +0000
Subject: Setup an empty unit test suite for lib.functions

I've added a dependency so if lib.macros isn't working, we can skip
all the tests in lib.functions.  Therefore we can use lib.macros in
the test code.
---
 cantedraw.asd        |  2 +-
 tests/functions.lisp | 24 ++++++++++++++++++++++++
 tests/main.lisp      |  3 ++-
 3 files changed, 27 insertions(+), 2 deletions(-)
 create mode 100644 tests/functions.lisp

diff --git a/cantedraw.asd b/cantedraw.asd
index be1b17e..6d38208 100644
--- a/cantedraw.asd
+++ b/cantedraw.asd
@@ -26,7 +26,7 @@
   :components ((:module "tests"
                 :components
                 ((:file "macros")
-                 ;; (:file "functions")
+                 (:file "functions")
                  ;; (:file "model")
                  ;; (:file "player")
                  ;; (:file "game")
diff --git a/tests/functions.lisp b/tests/functions.lisp
new file mode 100644
index 0000000..5d4d05a
--- /dev/null
+++ b/tests/functions.lisp
@@ -0,0 +1,24 @@
+;;; functions.lisp - 2025-02-20
+
+;; Copyright (C) 2025 Aryadev Chavali
+
+;; This program is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+;; FOR A PARTICULAR PURPOSE.  See the GNU General Public License Version 2 for
+;; details.
+
+;; You may distribute and modify this code under the terms of the GNU General
+;; Public License Version 2, which you should have received a copy of along with
+;; this program.  If not, please go to <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(defpackage cantedraw/tests/functions
+  (:use
+   :cl :parachute :cantedraw.lib.macros
+   :cantedraw.lib.functions))
+
+(in-package :cantedraw/tests/functions)
+
+(define-test function-test
+  :depends-on ((cantedraw/tests/macros macro-test)))
diff --git a/tests/main.lisp b/tests/main.lisp
index 0e8e462..e78d0d7 100644
--- a/tests/main.lisp
+++ b/tests/main.lisp
@@ -21,4 +21,5 @@
 
 (define-test all
   :serial t
-  :depends-on ((cantedraw/tests/macros macro-test)))
+  :depends-on ((cantedraw/tests/macros macro-test)
+               (cantedraw/tests/functions function-test)))
-- 
cgit v1.2.3-13-gbd6f