27 lines
1.1 KiB
Diff
27 lines
1.1 KiB
Diff
diff -ur odoc-1.5.0.old/src/loader/cmt.ml odoc-1.5.0.new/src/loader/cmt.ml
|
|
--- odoc-1.5.0.old/src/loader/cmt.ml 2020-02-07 19:11:54.000000000 +0000
|
|
+++ odoc-1.5.0.new/src/loader/cmt.ml 2020-04-22 14:13:53.458010790 +0100
|
|
@@ -78,10 +78,6 @@
|
|
read_pattern env parent doc pat
|
|
| Tpat_lazy pat ->
|
|
read_pattern env parent doc pat
|
|
-#if OCAML_MAJOR = 4 && OCAML_MINOR >= 08
|
|
- | Tpat_exception pat ->
|
|
- read_pattern env parent doc pat
|
|
-#endif
|
|
|
|
let read_value_binding env parent vb =
|
|
let container = (parent : Identifier.Signature.t :> Identifier.LabelParent.t) in
|
|
diff -ur odoc-1.5.0.old/src/loader/doc_attr.ml odoc-1.5.0.new/src/loader/doc_attr.ml
|
|
--- odoc-1.5.0.old/src/loader/doc_attr.ml 2020-02-07 19:11:54.000000000 +0000
|
|
+++ odoc-1.5.0.new/src/loader/doc_attr.ml 2020-04-22 14:13:03.597352779 +0100
|
|
@@ -34,7 +34,7 @@
|
|
#if OCAML_MAJOR = 4 && OCAML_MINOR = 02
|
|
Pexp_constant (Const_string (text, _))
|
|
#else
|
|
- Pexp_constant (Pconst_string (text, _))
|
|
+ Pexp_constant (Pconst_string (text, _, _))
|
|
#endif
|
|
; pexp_loc = loc; _}, _); _}] ->
|
|
Some (text, loc)
|