
23 Jul
2011
23 Jul
'11
2:58 a.m.
Dennis Raddle
mapOutList :: Ord k => [(k,a)] -> Mpa k [a] mapOutList list = M.fromList $ map (second (: [])) list
I'm not sure that this really does what you want. Rather something like this: fromAmbList :: Ord k => [(k, a)] -> Map k [a] fromAmbList = M.fromListWith (++) . map (second pure) Greets, Ertugrul -- nightmare = unsafePerformIO (getWrongWife >>= sex) http://ertes.de/