(import (scheme base)
(scheme write)
(scheme file)
(scheme process-context)
(srfi 64)
(retropikzel ctrf))
(test-runner-current (ctrf-runner))
(test-begin "ctrf")
(test-assert #t)
(test-equal '1 '(1 2 3))
(test-end "ctrf")