Comment out DeriveAnyClass extensions

src/Dodge/Data/CWorld.hs

@@ -1,4 +1,4 @@
-{-# LANGUAGE DeriveAnyClass #-}
+--{-# LANGUAGE DeriveAnyClass #-}
 {-# LANGUAGE DeriveGeneric #-}
 {-# LANGUAGE StrictData #-}
 {-# LANGUAGE TemplateHaskell #-}
@@ -19,6 +19,8 @@ import Dodge.Data.LWorld
 import Dodge.GameRoom
 import Geometry.ConvexPoly
 import Geometry.Data
+import qualified Data.Vector as V
+import qualified Data.Vector.Unboxed as UV
 
 data CWorld = CWorld
     { _lWorld :: LWorld
@@ -26,6 +28,8 @@ data CWorld = CWorld
     , _cClock :: Int
     , _cwTiles :: [Tile]
     , _pathGraph :: Gr Point2 PathEdge
+    , _incGraph :: V.Vector [(Int,SimpleEdge)]
+    , _incNode :: UV.Vector Point2
     , _numberFloorVerxs :: Int
     , _chasms :: [[Point2]]
     , _numberChasmVerxs :: Int