jroesch · August 29, 2015 14:00
diff --git a/Dictionary.elm b/Dictionary.elm
 type DDict v = Dict String (Dict String v)

 nested : DDict v
 nested = ...

 -- Let's assume we want to update all inner fields 
 updateInner :: String -> v -> DDict v -> DDict v
 updateInner s v d = Dict.fromList $ (keys d) (map (Dict.insert s v)  $ values d)
	type DDict v = Dict String (Dict String v)

	nested : DDict v
	nested = ...

	-- Let's assume we want to update all inner fields
	updateInner :: String -> v -> DDict v -> DDict v
	updateInner s v d = Dict.fromList $ (keys d) (map (Dict.insert s v) $ values d)
No results found