Commit 3b5bca7c authored by Alexandre Delanoë's avatar Alexandre Delanoë

[TREE] nodes -> children

parent 2d9fa3f7
......@@ -139,7 +139,7 @@ data Tree a = NodeT a [Tree a]
instance ToJSON (Tree NodeTree) where
toJSON (NodeT node nodes) =
object ["node" A..= toJSON node, "nodes" A..= toJSON nodes]
object ["node" A..= toJSON node, "children" A..= toJSON nodes]
instance FromJSON (Tree NodeTree)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment