summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--Changes2
-rw-r--r--tools/depend.ml2
2 files changed, 3 insertions, 1 deletions
diff --git a/Changes b/Changes
index bb9dc2498..7f0bb0dc9 100644
--- a/Changes
+++ b/Changes
@@ -18,6 +18,8 @@ Bug fixes:
- PR#5708: catch Failure"int_of_string" in ocamldebug
- PR#5731: instruction scheduling forgot to account for destroyed registers
- PR#5735: %apply and %revapply not first class citizens
+- PR#5738: first class module patterns not handled by ocamldep
+
Internals:
- Moved debugger/envaux.ml to typing/envaux.ml to publish env_of_only_summary
as part of compilerlibs, to be used on bin-annot files.
diff --git a/tools/depend.ml b/tools/depend.ml
index 7bf1d55b4..020289292 100644
--- a/tools/depend.ml
+++ b/tools/depend.ml
@@ -124,7 +124,7 @@ let rec add_pattern bv pat =
| Ppat_variant(_, op) -> add_opt add_pattern bv op
| Ppat_type li -> add bv li
| Ppat_lazy p -> add_pattern bv p
- | Ppat_unpack _ -> ()
+ | Ppat_unpack id -> add bv (mkloc (Lident id.txt) id.loc)
let rec add_expr bv exp =
match exp.pexp_desc with