Don't start the REPL server upon importing (2d repl).

* 2d/repl.scm (start-2d-repl): New procedure.
* examples/common.scm: Start the REPL server.
* sandbox: Start the REPL server.

1 files changed, 3 insertions, 1 deletions

diff --git a/sandbox b/sandbox
index f0daf68..4004ab1 100755
--- a/sandbox
+++ b/sandbox
@@ -38,10 +38,12 @@
              (2d window)
              (2d repl))
 
-(display "Welcome to the guile-2d sandbox.  Happy hacking!\n")
+(start-2d-repl)
 
 (add-hook! window-close-hook quit-game)
 
+(display "Welcome to the guile-2d sandbox.  Happy hacking!\n")
+
 (with-window (make-window #:title "Guile-2D Sandbox")
   (run-game-loop))