summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson@vistahigherlearning.com>2019-05-28 11:46:43 -0400
committerDavid Thompson <dthompson@vistahigherlearning.com>2019-05-28 11:46:43 -0400
commit7a618b35f18646d1b02109b524e2521de919dc4f (patch)
tree188d70dc84b89e1b27836a59e753c911501592b2
parenta23f1d2d8370b6fe4fcaed005b5f56d5f1fb073b (diff)
repl: Sleep during debug loop.
-rw-r--r--starling/repl.scm1
1 files changed, 1 insertions, 0 deletions
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")))