diff options
Diffstat (limited to 'tempest.lisp')
| -rw-r--r-- | tempest.lisp | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tempest.lisp b/tempest.lisp index 526bade..34b8c01 100644 --- a/tempest.lisp +++ b/tempest.lisp @@ -1,4 +1,12 @@ (in-package #:tempest) +(defparameter path-to-watch "./") + (defun main () + (file-notify:watch path-to-watch) + (file-notify:with-events (file change :timeout T) + (when (str:ends-with-p ".lisp" file :ignore-case T) + (print (list file change)))) (format t "Tempest is starting.")) + +(main) |