Use float values to represent module's priority

core/modules.lisp

@@ -40,14 +40,14 @@ The module is expected to have at least `initialize', `update', and `finalize' f
   `(register-module ',module
                      ,(ecase priority
                         (:first (if (null *modules-list*)
-                                    0
+                                    0.0
                                     (1- (caar *modules-list*))))
                         (:last (if (null *modules-list*)
-                                   10
+                                   10.0
                                    (1+ (caar (reverse *modules-list*)))))
-                        (:jobs 1)
-                        (:resources 2)
-                        (:input 3)
-                        (:game 4)
-                        (:render 9)
+                        (:jobs 1.0)
+                        (:resources 2.0)
+                        (:input 3.0)
+                        (:game 4.0)
+                        (:render 9.0)
                         (t priority))))