| summaryrefslogtreecommitdiff |
diff options
| author | nsensfel <SpamShield0@noot-noot.org> | 2019-11-25 18:05:46 +0100 |
|---|---|---|
| committer | nsensfel <SpamShield0@noot-noot.org> | 2019-11-25 18:05:46 +0100 |
| commit | 4094b24940779d298a3ff97525ac40deac093cab (patch) | |
| tree | 43584afa8b22e571c4de0a0876381a1de7e96e06 /src/shared/battle-map/BattleMap/Struct/DataSetItem.elm | |
| parent | a2bac44a4c8abc064de55d0779edcb07aaa86e62 (diff) | |
...
Diffstat (limited to 'src/shared/battle-map/BattleMap/Struct/DataSetItem.elm')
| -rw-r--r-- | src/shared/battle-map/BattleMap/Struct/DataSetItem.elm | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/src/shared/battle-map/BattleMap/Struct/DataSetItem.elm b/src/shared/battle-map/BattleMap/Struct/DataSetItem.elm new file mode 100644 index 0000000..c36906f --- /dev/null +++ b/src/shared/battle-map/BattleMap/Struct/DataSetItem.elm @@ -0,0 +1,27 @@ +module BattleMap.Struct.DataSetItem exposing (Type(..), add_to) + +-- Battle Map ------------------------------------------------------------------ +import BattleMap.Struct.DataSet +import BattleMap.Struct.Tile + +-------------------------------------------------------------------------------- +-- TYPES ----------------------------------------------------------------------- +-------------------------------------------------------------------------------- +type Type = + Tile BattleMap.Struct.Tile.Type + +-------------------------------------------------------------------------------- +-- LOCAL ----------------------------------------------------------------------- +-------------------------------------------------------------------------------- + +-------------------------------------------------------------------------------- +-- EXPORTED -------------------------------------------------------------------- +-------------------------------------------------------------------------------- +add_to : ( + Type -> + BattleMap.Struct.DataSet.Type -> + BattleMap.Struct.DataSet.Type + ) +add_to item dataset = + case item of + (Tile tl) -> (BattleMap.Struct.DataSet.add_tile tl dataset) |