Start work on pathfinding

src/Dodge/Creature/Update.hs

@@ -43,11 +43,11 @@ updateCreature' cr =
     chasmTest cr . case _crType cr of
         Avatar{} ->
             (cWorld . lWorld . creatures . ix 0 . crType . avatarPulse %~ updatePulse)
-                . crUpdate' yourControl cr
+                . crUpdate yourControl cr
         LampCrit{} -> updateLampoid cr
         BarrelCrit bt -> updateBarreloid bt cr
         AvatarDead -> id
-        _ -> crUpdate' updateHumanoid cr
+        _ -> crUpdate updateHumanoid cr
 
 {- | this seems to work, but I am not sure about the ordering:
  previously, the movement was updated before the ai in order to correctly set the oldpos.
@@ -56,8 +56,8 @@ updateCreature' cr =
  at what point invSideEffects is applied wrt to when the creature moves
  may affect whether the shield moves correctly
 -}
-crUpdate' :: (Creature -> World -> World) -> Creature -> World -> World
-crUpdate' f cr =
+crUpdate :: (Creature -> World -> World) -> Creature -> World -> World
+crUpdate f cr =
     checkDeath cid
         . doDamage cid
         . invItemEffs cid