aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/SYSTEM-test.lisp31
1 files changed, 31 insertions, 0 deletions
diff --git a/test/SYSTEM-test.lisp b/test/SYSTEM-test.lisp
new file mode 100644
index 0000000..3de09df
--- /dev/null
+++ b/test/SYSTEM-test.lisp
@@ -0,0 +1,31 @@
1;;;; SYSTEM-test.lisp
2;;;; Tests for SYSTEM
3
4
5;; ---------------------------------------------------------------------
6;;; Package Definition
7;; ---------------------------------------------------------------------
8(defpackage :SYSTEM-test
9 (:use :common-lisp :SYSTEM :fiveam)
10 (:export #:SYSTEM-test-all))
11
12(in-package :SYSTEM-test)
13
14
15;; ---------------------------------------------------------------------
16;;; 5AM Test Suite Definition
17;; ---------------------------------------------------------------------
18(5am:def-suite SYSTEM-test-suite
19 :description "Test suite for SYSTEM.")
20
21(5am:in-suite SYSTEM-test-suite)
22
23
24;; ---------------------------------------------------------------------
25;;; Tests
26;; ---------------------------------------------------------------------
27
28;; Bullshit
29(5am:test existence
30 "Bullshit test just for implementing tests."
31 (is (equal (fash:entrypoint) "SYSTEM")))