summaryrefslogtreecommitdiff
path: root/Com/Simatime/Test.scm
diff options
context:
space:
mode:
Diffstat (limited to 'Com/Simatime/Test.scm')
-rw-r--r--Com/Simatime/Test.scm16
1 files changed, 16 insertions, 0 deletions
diff --git a/Com/Simatime/Test.scm b/Com/Simatime/Test.scm
new file mode 100644
index 0000000..638940f
--- /dev/null
+++ b/Com/Simatime/Test.scm
@@ -0,0 +1,16 @@
+;; a testing framework for scheme
+;; inspired by clojure.test and srfi-64
+
+(define-module (Com Simatime Test)
+ #:use-module ((Com Simatime 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
+ ((_ description ...)
+ ((begin (prn description) ...))))