From 58e9e6c16ce132ac98c56c9821cee3176c6bbc5b Mon Sep 17 00:00:00 2001 From: Dennis Frieberg Date: Sun, 6 Sep 2020 02:13:02 +0200 Subject: [PATCH] make a good default instead of maybe --- src/Data/TickLeiste.hs | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/src/Data/TickLeiste.hs b/src/Data/TickLeiste.hs index 020b8f4..385c39f 100644 --- a/src/Data/TickLeiste.hs +++ b/src/Data/TickLeiste.hs @@ -116,11 +116,10 @@ removePlayer = error "removePlayer not yet implemented (Franzi?)" toList :: TickLeiste -> [(Tick, [Player])] toList (TickLeiste l _) = M.toAscList l --- | convert from list to TickLeiste, if a player is at multiple 'Tick' this returns --- 'Nothing' +-- | convert from list to TickLeiste -- TODO -fromList :: [(Tick, [Player])] -> Maybe TickLeiste +fromList :: [(Tick, [Player])] -> TickLeiste fromList = error "not implemented" -- | convert from 'TickLeiste' to a map from 'Tick' to list of 'Player'