1 files changed, 13 insertions, 0 deletions
diff --git a/common-lisp/unit-testing.lisp b/common-lisp/unit-testing.lisp
new file mode 100644
index 000000000000..c0b3be9b4515
--- /dev/null
+++ b/common-lisp/unit-testing.lisp
@@ -0,0 +1,13 @@
+(in-package #:cl-user)
+(defpackage #:my-test
+  (:documentation "Unit testing in Common Lisp.")
+  (:use #:cl))
+(in-package #:my-test)
+
+(plan 3)
+
+(ok (not (find 4 '(1 2 3))))
+(is 4 4)
+(isnt 1 #\1)
+
+(finalize)