summaryrefslogtreecommitdiff
path: root/Alpha/Test.scm
diff options
context:
space:
mode:
authorBen Sima <ben@bsima.me>2020-04-15 09:54:10 -0700
committerBen Sima <ben@bsima.me>2020-04-15 10:06:56 -0700
commitf4b8c0df041b063c0b47d2ec6c818a9c202fd833 (patch)
tree01ad246a83fda29c079847b3397ca6509a7f6106 /Alpha/Test.scm
parent6ed475ca94209ce92e75f48764cb9d361029ea26 (diff)
Re-namespacing
Moving away from the DNS-driven namespacing toward more condensed names, mostly because I don't like typing so much.
Diffstat (limited to 'Alpha/Test.scm')
-rw-r--r--Alpha/Test.scm16
1 files changed, 16 insertions, 0 deletions
diff --git a/Alpha/Test.scm b/Alpha/Test.scm
new file mode 100644
index 0000000..8c0916d
--- /dev/null
+++ b/Alpha/Test.scm
@@ -0,0 +1,16 @@
+;; a testing framework for scheme
+;; inspired by clojure.test and srfi-64
+
+(define-module (Alpha Test)
+ #:use-module ((Alpha 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) ...))))