Add a declaim for compiling code with max debug and safety

src/stoe.lisp

@@ -10,6 +10,8 @@
   (:export :main :quit))
 (in-package :stoe)
 
+(declaim (optimize (debug 3) (safety 3) (speed 0)))
+
 (let ((exit-main-loop nil))
   (defun main-loop (&optional unprotected)
     "Run the protected main-loop. An error will be catched with the possibility to