Commits

camlspotter committed 587ac17

meta_conv 0.11.1

  • Participants
  • Parent commits 808369c
  • Branches dev

Comments (0)

Files changed (2)

     curl
     tiny_json_conv
     ocaml_conv
-    sexplib
     spotlib
 
 OCAMLFLAGS = -annot -w A-4-9-39 
-OCAMLDEPFLAGS= -syntax camlp4o -package meta_conv.syntax,sexplib.syntax
-OCAMLPPFLAGS=  -syntax camlp4o -package meta_conv.syntax,sexplib.syntax
+OCAMLDEPFLAGS= -syntax camlp4o -package meta_conv.syntax
+OCAMLPPFLAGS=  -syntax camlp4o -package meta_conv.syntax
 
 FILES[] =
     xcurl
 open Printf
 open Common
 open Tiny_json
+open Meta_conv.Open
 open Json_conv
-open Sexplib.Conv
 open Ocaml_conv
 
 open Meta_conv.Types.Result.Open
 
-type 'target mc_leftovers = (string * 'target) list with conv(json), conv(ocaml)
+(* field of type Json.t mc_leftovers is automatically handled for Json, but not for ocaml *)
+type 'target mc_leftovers = (string * 'target) list with conv(ocaml)
+(* CR jfuruse: mc_fields should be supported in Ocaml_conv *)
+type 'target mc_fields = (string * 'target) list with conv(ocaml)
 
 module Json = struct
   include Json
   (* https://api.bitbucket.org/1.0/repositories/{accountname}/{repo_slug}/branches *)
   module Branches = struct
 
-    type t = Data.Branch.t mc_leftovers with conv(json), conv(ocaml)
+    type t = Data.Branch.t mc_fields with conv(json), conv(ocaml)
 
     let get ~accountname ~repo_slug = 
       Format.eprintf "%s : %s...@." accountname repo_slug;