compact OCaml heap after type check

Reviewed By: arthaud Differential Revision: D45327867 fbshipit-source-id: c4c1a621d0c7a43602da42867504db53d2041278
facebook · Apr 27, 2023 · f66610c · f66610c
1 parent 7b3fe70
commit f66610c
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/source/interprocedural_analyses/taint/taintAnalysis.ml b/source/interprocedural_analyses/taint/taintAnalysis.ml
@@ -340,6 +340,8 @@ let run_taint_analysis
 
   let environment = type_check ~scheduler ~configuration ~cache in
 
+  compact_ocaml_heap ~name:"after type check";
+
   let qualifiers =
     Analysis.TypeEnvironment.module_tracker environment
     |> Analysis.ModuleTracker.read_only