fix error with Tsubst in ocaml 4.13 (the type definition has been changed)

Author: mhjd

src/odoc_wiki/odoc_import.ml

@@ -32,7 +32,7 @@ let raw_string_of_type_list ?(margin = default_margin) sep type_list =
   let rec need_parent t =
     match t.Types.desc with
       Types.Tarrow _ | Types.Ttuple _ -> true
-    | Types.Tlink t2 | Types.Tsubst t2 -> need_parent t2
+    | Types.Tlink t2 | Types.Tsubst (t2, _) -> need_parent t2
     | Types.Tconstr _ ->
         false
     (* | Types.Tvar | Types.Tunivar | Types.Tobject _ | Types.Tpoly _ *)
@@ -120,7 +120,7 @@ let string_of_class_type_param_list ?margin l =
 let rec is_arrow_type t =
   match t.Types.desc with
     Types.Tarrow _ -> true
-  | Types.Tlink t2 | Types.Tsubst t2 -> is_arrow_type t2
+  | Types.Tlink t2 | Types.Tsubst (t2, _) -> is_arrow_type t2
   (* | Types.Ttuple _ *)
   (* | Types.Tconstr _ *)
   (* | Types.Tvar | Types.Tunivar | Types.Tobject _ | Types.Tpoly _ *)

wikidoc.opam

@@ -18,7 +18,7 @@ remove: [
   [ "rm" "-f" "%{bin}%/latex_of_wiki" ]
 ]
 depends: [
-  "ocaml" {>= "4.10.0" & < "4.13.0"}
+  "ocaml" {= "4.13.0"}
   "base-threads"
   "base-unix"
   "ocamlfind"