Replace infinite loop with with (loop repeat 5 ...

This way the background thread is bound to terminate on its own, without
the user having to figure out how to terminate it.

Author: iamFIREcracker

debugging.md

@@ -397,7 +397,7 @@ If needed, import the dependencies first:
   (swank:create-server :port 4006)
   (format t "we are past go!~%")
   (bt:make-thread (lambda ()
-                    (loop while t do
+                    (loop repeat 5 do
                           (sleep 5)
                           (dostuff)
                           (incf *counter*)))