Commits

Richo Healey  committed 71714e5

Add some tests

  • Participants
  • Parent commits d2bda15

Comments (0)

Files changed (2)

+#!/usr/bin/env csi -s
+(use posix)
+(setenv "IDENTSO_DATASTORE" "file")
+(require "main")
+(use test)
+
+(for-each
+  (lambda (file)
+      (if (string-suffix? ".scm" file)
+          (require (string-append "test/" (substring file 0 (- (string-length file) 4))))))
+  (directory "test"))

File test/util.scm

+(test-begin "util")
+
+(test '((rawr . "foo") (something . 5))
+      (list->alist (list 'rawr "foo" 'something 5)))
+
+(test-end)