Work on bee movement

2026-05-02 22:08:06 +01:00
parent b827827951
commit aef3671063
4 changed files with 27 additions and 12 deletions
@@ -151,7 +151,9 @@ data Strategy
    | Flee
 --    | MeleeStrike
    | Search
+    | ReturnToHive
    | HarvestFrom {_harvestTarget :: Int}
+    | StrategyInt {_strategyInt :: Int}
    deriving (Eq, Ord, Show) --Generic, Flat)
    --deriving (Eq, Ord, Show, Read) --Generic, Flat)