debugging threads
This commit is contained in:
@@ -886,7 +886,8 @@
|
|||||||
(event-callback evt-guard-stop)
|
(event-callback evt-guard-stop)
|
||||||
(dbg-webview "Waiting for thread to stop")
|
(dbg-webview "Waiting for thread to stop")
|
||||||
(while (not (eq? evt-processing-thread #f))
|
(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")
|
(dbg-webview "Event processing stopped")
|
||||||
|
|
||||||
; cleanup the library
|
; cleanup the library
|
||||||
|
|||||||
Reference in New Issue
Block a user