robur/builder-web
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make json structure uniform

Browse source 
In `opamndiff` we have a similar structure but simply `version_left` and `version_right`.
https://git.robur.coop/robur/builder-web/src/branch/main/opamdiff/opamdiff.ml#L284-L286
This commit is contained in:
PixieDust 2024-12-29 07:38:51 +00:00
parent b22f571a92
commit c48a1bef3c
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lib/utils.ml
View file

@ -1,4 +1,3 @@
module String_map = struct module String_map = struct
include Map.Make(String) include Map.Make(String)
@ -16,8 +15,8 @@ let diff_map_to_json (left, right, different_versions) =
`List (List.map (fun (name, version1, version2) -> `List (List.map (fun (name, version1, version2) ->
`Assoc [ `Assoc [
("name", `String name); ("name", `String name);
("version_in_left", `String version1); ("version_left", `String version1);
("version_in_right", `String version2) ("version_right", `String version2)
] ]
) lst) ) lst)
in in