From 1c8a22d24b14d258a9103f7b83d627359eae0da8 Mon Sep 17 00:00:00 2001
From: "Juan J. Martinez" <jjm@usebox.net>
Date: Tue, 21 Mar 2023 21:02:45 +0000
Subject: Player transition into the stage

---
 src/Game/Entities/Types.hs | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'src/Game/Entities/Types.hs')

diff --git a/src/Game/Entities/Types.hs b/src/Game/Entities/Types.hs
index 4ece6c5..e8b29b0 100644
--- a/src/Game/Entities/Types.hs
+++ b/src/Game/Entities/Types.hs
@@ -29,7 +29,13 @@ data Entities = Entities
 -- | The effect name must match the sprite name in the spritesheet.
 type EffectName = String
 
-data Action = ActionAddEffect Int Int EffectName | ActionAddBattery Int Int | ActionHitPlayer | ActionExitStarted | ActionExitDone
+data Action
+  = ActionAddEffect Int Int EffectName
+  | ActionAddBattery Int Int
+  | ActionHitPlayer
+  | ActionExitStarted
+  | ActionEntryDone
+  | ActionExitDone
 
 data Entity = Entity
   { typ :: Type,
-- 
cgit v1.2.3