diff --git a/lib/dot_of_tast.ml b/lib/dot_of_tast.ml index e9b7fee..86bf43d 100644 --- a/lib/dot_of_tast.ml +++ b/lib/dot_of_tast.ml @@ -937,7 +937,9 @@ let merlin_parse str : Gr.t = Log.info (fun m -> m "merlin_parse..."); let typer = Mpipeline.typer_result pipeline in let typedtree = Mtyper.get_typedtree typer in - let _mbrowse = Mbrowse.of_typedtree typedtree in + let _initial_env = Mtyper.initial_env typer in + let mbrowse = Mbrowse.of_typedtree typedtree in + Log.info (fun m -> m "Mbrowse.print %s" (Mbrowse.print () mbrowse)); match typedtree with | `Implementation t -> Log.info (fun m ->