refactor platform and wall type declarations out into platform.sml and wall.sml

This commit is contained in:
2025-02-14 09:26:07 +00:00
parent 93aebe5fa1
commit d1e23b5455
5 changed files with 21 additions and 15 deletions

View File

@@ -15,6 +15,18 @@ struct
structure EnemyMap = MakeGapMap(EnemyPair)
(* - Updating state of enemies per-frame - *)
(*
structure UpdateEnemies = MakeGapMapMapper (struct
structure Pair = EnemyPair
type env = {walls: wall vector, wallTree: QuadTree.t, platforms: platform
vector, platformTree: QuadTree.t}
(enemy, walls, wallTree, platforms, platformTree, player, graph) =
end)
*)
(* - Generating enemy tree - *)
structure EnemyTree =
MakeGapMapFolder