let to_json {name; version}: Yojson.Basic.json = `Assoc [ "name", `String name; "version", (match version with |`V_0_1_6_beta -> `String "V_0_1_6_beta" |`V_2_0_2_beta -> `String "V_2_0_2_beta"); ]