(import (scheme base)
(scheme write)
(scheme file)
(scheme process-context)
(retropikzel shell)
(srfi 64))
(test-begin "shell")
(write (shell "ls"))
(newline)
(write (shell->list "ls"))
(write (shell->sexp "echo '(1 2 3)'"))
(test-end "shell")