lilu-desk/ext-apps/lem/tests/test.lisp

(defpackage #:lilu-lem-tests
  (:use #:cl #:fiveam #:lilu-lem))

(in-package #:lilu-lem-tests)

(def-suite lilu-lem-system
  :description "Test lilu-lem system")

(in-suite lilu-lem-system)

(test lem-version
  (let ((version (lilu-lem::lem-version)))
    (is (string= "1.8" version))))

;;;
;;;
;;;

(defun run-tests ()
  (run! 'lilu-lem-system))