Get rid of warnings

2025-06-07 19:14:56 +01:00
parent 81a7dcd962
commit faa3c4cde4
12 changed files with 85 additions and 96 deletions
@@ -40,9 +40,9 @@ moveShockwave w sw
        | otherwise =
            cr & crState . csDamage
                .:~ Explosive dam p
-      where
-        cpos = _crPos cr
-        v = normalizeV (cpos -.- p)
+      --where
+      --  cpos = _crPos cr
+      --  v = normalizeV (cpos -.- p)

 moveInverseShockwave ::
    World ->
@@ -63,6 +63,6 @@ moveInverseShockwave w sw
        | otherwise =
            cr & crState . csDamage
                .:~ Explosive 1 p
-      where
-        cpos = _crPos cr
-        v = normalizeV (cpos -.- p)
+      --where
+      --  cpos = _crPos cr
+      --  v = normalizeV (cpos -.- p)