summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'client/elm/battlemap/src/Util')
-rw-r--r-- | client/elm/battlemap/src/Util/Array.elm | 14 | ||||
-rw-r--r-- | client/elm/battlemap/src/Util/List.elm | 12 |
2 files changed, 0 insertions, 26 deletions
diff --git a/client/elm/battlemap/src/Util/Array.elm b/client/elm/battlemap/src/Util/Array.elm deleted file mode 100644 index 8088244..0000000 --- a/client/elm/battlemap/src/Util/Array.elm +++ /dev/null @@ -1,14 +0,0 @@ -module Util.Array exposing (update) - -import Array - -update : ( - Int -> - ((Maybe t) -> (Maybe t)) -> - (Array t) -> - (Array t) - ) -update index fun array = - case (fun (Array.get index array)) of - Nothing -> array - (Just e) -> (Array.set index e array) diff --git a/client/elm/battlemap/src/Util/List.elm b/client/elm/battlemap/src/Util/List.elm deleted file mode 100644 index c4db397..0000000 --- a/client/elm/battlemap/src/Util/List.elm +++ /dev/null @@ -1,12 +0,0 @@ -module Util.List exposing (pop) - -import List - -pop : List a -> (Maybe (a, List a)) -pop l = - case - ((List.head l), (List.tail l)) - of - (Nothing, _) -> Nothing - (_ , Nothing) -> Nothing - ((Just head), (Just tail)) -> (Just (head, tail)) |