boomslang-0.0.1: src/Game/Entity/Dot/Activity.hs

module Game.Entity.Dot.Activity
  ( Activity (..)
  )
  where

-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --

data Activity
  = Roaming
  | Hit
  | None
  deriving (Eq, Show, Ord)