@@ -23,7 +23,7 @@ toModules ms =
2323 "{ \"modules\" : [\n " ++ intercalate ",\n " (map toModule ms) ++ "\n ]\n}"
2424
2525toModule (name, values) =
26− "{ \"module\" : " ++ show name ++ ",\n \"values\" : [\n " ++ vs ++ "\n ]\n }"
26+ "{ \"name\" : " ++ show name ++ ",\n \"values\" : [\n " ++ vs ++ "\n ]\n }"
2727 where vs = intercalate ",\n " (map toValue values)
2828
2929toValue (name, tipe) =