blob: a45bca142355c72dd3630b361f953724de2f8e8a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
;; a testing framework for scheme
;; inspired by clojure.test and srfi-64
(define-module (bs test)
#:use-module ((bs core)
#:select (prn))
#:export (testing))
;; TODO: learn srfi-64
;; TODO: port over `deftest' et al from clojure
;; TODO: someday a quickcheck-like would be best
;; simple analog to clojure's `testing'
(define-syntax testing
(syntax-rules ()
((_ description ...)
((begin (prn description) ...)))))
|
