diff options
| -rw-r--r-- | tempest.lisp | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/tempest.lisp b/tempest.lisp index a0ecb22..02bc03b 100644 --- a/tempest.lisp +++ b/tempest.lisp @@ -46,3 +46,14 @@ (format t "Built ~a, because of ~a~%" built-file change) nil))))) +(defun run (subcommand &rest args) + (cond ((equal subcommand "build") + (mapcar 'build args)) + ;; TODO support watching multiple dirs + ((equal subcommand "watch") + (watch (car args))))) + +(defun main () + (let ((cli-args (cdr sb-ext:*posix-argv*))) + (run (car cli-args) (cdr cli-args)))) + |