(module vandusen-cmd ()

(import scheme)
(import (chicken base)
        (chicken port)
        (chicken process-context))
(import vandusen)

(when (null? (command-line-arguments))
  (with-output-to-port (current-error-port)
    (cut print "error: no config file given" ))
  (exit 1))

(start (car (command-line-arguments)))
(print "exit")

) ;; end module