• tests grouped into modules, modules composable
• simple syntax for input/output
• nestable assertions with concatenated titles
• hooks for before/after/inbetween, custom reporters
• using modules is optional

• all test code compiled before running (no compile messages during run)
• modules can extend runner settings
• no restriction on execution strategy (e.g. repeat, parallel)
• tests across multiple files can run as one with grouped output
• "only" and "exclude" filters available

• scheme interface: run tests from scheme (e.g. ci)
• stdout reporting optional
• "compact" reporting format for efficiency
• reporters extendable, selected via settings

• tests are procedures
• modules are r6rs libraries
• functional style, no hidden state, no goops, no opaque types

(define-test-module (test module sph string)
  (import (sph string))
  (test-execute-procedures-lambda
    (string-indices
      ("/a////b//c/d" "/") (0 2 3 4 5 7 8 10)
      ("abcd" "bc") (1))
    (string-multiply
      ("a" 3) "aaa")
    (string-replace-string
      ("abcd" "bc" "") "ad")))

string-indices 1 2
string-multiply 1
string-replace-string 1

string-quote 1
  failure string-quote 2
  inp "t'est"
  exp "\"t'est\"x"
  out "\"t'est\""

test module sph vector
  vector-append 1
test module sph record
  define-record 1

(define-test-module (test module mymodule)
  (import (mymodule))
  (lambda (settings)
    (assert-true "addition" (= 3 (+ 2 1)))))

(define-test (name args ...) test-result)
(define-test (abc) #t)
(define-test (abc args expected) #t)
(define-test (abc name index args expected) #t)

(import (sph) (sph test))
(define settings (test-settings-default-custom path-search "modules" reporter-name (q compact)))
(test-execute-modules-by-prefix #:settings settings (q (test module sph)))