From 7a618b35f18646d1b02109b524e2521de919dc4f Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson@vistahigherlearning.com>
Date: Tue, 28 May 2019 11:46:43 -0400
Subject: repl: Sleep during debug loop.

---
 starling/repl.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/starling/repl.scm b/starling/repl.scm
index 24af6f8..cfaf5b0 100644
--- a/starling/repl.scm
+++ b/starling/repl.scm
@@ -80,6 +80,7 @@
     (display "waiting for developer to debug..." (current-error-port))
     (while (repl-debugging? repl)
       (poll-coop-repl-server (repl-server repl))
+      (usleep 160000)
       #t)
     (set! (repl-debug repl) #f)
     (display " done!\n")))
-- 
cgit v1.2.3