Collision.hs

   1 module Collision where
   2
   3 data Collision =
   4   Null |
   5   Monster |
   6   Player Int |
   7   RemapControls |
   8   ReloadLevel |
   9   ModifyPlayer |
  10   GameOver |
  11   GotControlled
  12
  13