From 2805c647010cbcca126ebf162fcbdd691fc72488 Mon Sep 17 00:00:00 2001 From: nsensfel Date: Wed, 18 Oct 2017 13:48:58 +0200 Subject: Correcting whatever the compiler tells me is wrong. --- elm/battlemap/src/Battlemap/Tile.elm | 18 ++++++------------ 1 file changed, 6 insertions(+), 12 deletions(-) (limited to 'elm/battlemap/src/Battlemap/Tile.elm') diff --git a/elm/battlemap/src/Battlemap/Tile.elm b/elm/battlemap/src/Battlemap/Tile.elm index e90e9bc..828fb67 100644 --- a/elm/battlemap/src/Battlemap/Tile.elm +++ b/elm/battlemap/src/Battlemap/Tile.elm @@ -1,27 +1,21 @@ module Battlemap.Tile exposing ( Type, - set_character, - get_character, + get_class, get_cost ) import Battlemap.Location -import Character - type alias Type = { location : Battlemap.Location.Ref, - floor_level : Int, - char_level : (Maybe Character.Ref) + class : Int, + crossing_cost : Int } -set_character : (Maybe Character.Ref) -> Type -> Type -set_character char_ref tile = {tile | char_level = char_ref} - -get_character : Type -> (Maybe Character.Ref) -get_character tile = tile.char_level +get_class : Type -> Int +get_class tile = tile.class get_cost : Type -> Int -get_cost tile = tile.floor_level +get_cost tile = tile.crossing_cost -- cgit v1.2.3-70-g09d2