From 97b148a4ec811a082472c3abe06e85c3d0789066 Mon Sep 17 00:00:00 2001
From: Hans Dijkema <hans@dijkewijk.nl>
Date: Mon, 20 Apr 2026 14:38:42 +0200
Subject: [PATCH] debugging threads

---
 racket-webview-qt.rkt | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/racket-webview-qt.rkt b/racket-webview-qt.rkt
index 743974f..fa170b6 100644
--- a/racket-webview-qt.rkt
+++ b/racket-webview-qt.rkt
@@ -886,7 +886,8 @@
     (event-callback evt-guard-stop)
     (dbg-webview "Waiting for thread to stop")
     (while (not (eq? evt-processing-thread #f))
-           (sleep 0.01))
+           (dbg-webview "evt-processing-thread = ~a" evt-processing-thread)
+           (sleep 1))
     (dbg-webview "Event processing stopped")
 
     ; cleanup the library