Compare commits
3 Commits
8c87cf5b37
...
77952ad294
Author | SHA1 | Date |
---|---|---|
Craig Oates | 77952ad294 | 3 years ago |
Craig Oates | d11119bfdc | 3 years ago |
Craig Oates | b055b97e2a | 3 years ago |
3 changed files with 16 additions and 47 deletions
@ -1,6 +1,7 @@
|
||||
;;;; package.lisp |
||||
;;;; tests/package.lisp |
||||
|
||||
(defpackage #:ritherdon-rest-tests |
||||
(:use #:cl #:fiveam) |
||||
(:export #:run! |
||||
#:all-tests)) |
||||
#:all-tests |
||||
#:test-quasi)) |
||||
|
@ -1,35 +0,0 @@
|
||||
;;;; ritherdon-rest-tests.lisp |
||||
|
||||
(in-package #:ritherdon-rest-tests) |
||||
|
||||
(def-suite all-tests |
||||
:description "The master suite of all ritherdon-rest tests.") |
||||
|
||||
(in-suite all-tests) |
||||
|
||||
;; These two examples show the 'full' call to the fiveAm test |
||||
;; functions. This is just for reference. The 'namespace' is already |
||||
;; 'imported' in 'package.lisp'. |
||||
|
||||
;; (fiveam:test sum-1 |
||||
;; (fiveam:is (= 3 (+ 1 2)))) |
||||
|
||||
;; (fiveam:run!) |
||||
|
||||
;; How you would normally create the tests -- with fiveAM already |
||||
;; set-up in 'package.lisp' and not needing to be explicit about it |
||||
;; here. This is similar to 'using static' in C#. |
||||
|
||||
(defun test-quasi() |
||||
(run! 'all-tests)) |
||||
|
||||
(test dummy-tests |
||||
"Just a placeholder." |
||||
(is (listp (list 1 2))) |
||||
(is (= 5 (+ 2 3))) |
||||
(is (< 4 (+ 100 400)))) |
||||
|
||||
(test dummy-tests-two |
||||
"This is another placeholder test. |
||||
This is just to make sure everything is set-up properly." |
||||
(is (equal 4 4))) |
Reference in new issue