diff options
-rw-r--r-- | Changes | 2 | ||||
-rw-r--r-- | tools/depend.ml | 2 |
2 files changed, 3 insertions, 1 deletions
@@ -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 |