Fix optimize setting usage to work

src/internal.lisp

@@ -14,6 +14,19 @@
 ;;;; You should have received a copy of the GNU Affero General Public License
 ;;;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
+#+forever-game-roguelike-debug (progn (declaim (optimize (compilation-speed 0)
+                                                         (debug 3)
+                                                         (safety 3)
+                                                         (space 1)
+                                                         (speed 1)))
+                                      (format t "DEBUG MODE"))
+
+#+forever-game-roguelike-optimize (progn (declaim (optimize (compilation-speed 0)
+                                                             (debug 0)
+                                                             (safety 1)
+                                                             (space 2)
+                                                             (speed 3)))
+                                          (format t "OPTIMIZE MODE"))
 
 (in-package #:forever-game-roguelike-internal)
 

start-dev.lisp

@@ -1,8 +1,4 @@
-(declaim (optimize (compilation-speed 0)
-                   (debug 3)
-                   (safety 3)
-                   (space 1)
-                   (speed 1)))
-(ql:quickload :forever-game-roguelike)
+(push :forever-game-roguelike-debug *features*)
+(asdf:load-system :forever-game-roguelike :verbose t :force t)
 (defvar *game-state* (forever-game-roguelike-internal::make-game-state))
 (forever-game-roguelike:start-dev *game-state*)

start-game.lisp

@@ -1,7 +1,3 @@
-(declaim (optimize (compilation-speed 0)
-                   (debug 0)
-                   (safety 1)
-                   (space 2)
-                   (speed 3)))
-(ql:quickload :forever-game-roguelike)
+(push :forever-game-roguelike-optimize *features*)
+(asdf:load-system :forever-game-roguelike :force t)
 (forever-game-roguelike:start)