From 17b4dd905c7d02cdeb841da8ce97416c173fe8df Mon Sep 17 00:00:00 2001
From: eltrac <hi@eltr.ac>
Date: Wed, 26 Aug 2026 13:40:59 +0800
Subject: main: watch for .lisp file changes

---
 tempest.lisp | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'tempest.lisp')

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)
-- 
cgit v1.2.3