git.iko.soy/elk
on master help sign in
Switch one of the names in the JSON representation of type info.
6761fbbevancz
compiler/src/Docs.hs+1−1
compare with master
unifiedsplit
@@ -23,7 +23,7 @@ toModules ms =
23 "{ \"modules\" : [\n " ++ intercalate ",\n " (map toModule ms) ++ "\n ]\n}"
23 "{ \"modules\" : [\n " ++ intercalate ",\n " (map toModule ms) ++ "\n ]\n}"
24
24
25toModule (name, values) =
25toModule (name, values) =
26− "{ \"module\" : " ++ show name ++ ",\n \"values\" : [\n " ++ vs ++ "\n ]\n }"
26+ "{ \"name\" : " ++ show name ++ ",\n \"values\" : [\n " ++ vs ++ "\n ]\n }"
27 where vs = intercalate ",\n " (map toValue values)
27 where vs = intercalate ",\n " (map toValue values)
28
28
29toValue (name, tipe) =
29toValue (name, tipe) =