camlspotter avatar camlspotter committed 7420aeb

added mc_option coders

Comments (0)

Files changed (2)

   | Null -> Some None
   | v -> Some (Some v)) d
+let json_of_mc_option = json_of_option
+let mc_option_of_json = option_of_json
 let lazy_t_of_json f = generic_lazy_t_of (fun e -> raise (Error e)) f
 let mc_lazy_t_of_json = generic_mc_lazy_t_of 


 val lazy_t_of_json    : 'a decoder -> 'a lazy_t decoder
 val mc_lazy_t_of_json : 'a decoder -> ('a, Json.t) mc_lazy_t decoder
+val json_of_mc_option : 'a encoder -> 'a mc_option encoder
+val mc_option_of_json : 'a decoder -> 'a mc_option decoder
 val json_of_mc_fields : ('a -> Json.t) -> (string * 'a) list -> Json.t
 val mc_fields_of_json : 'a decoder -> (string * 'a) list decoder
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.