Module `Inlining_tree.Key`

type scope =

| Module
| Class
| Unknown

val compare_scope : 
  Flambda2_simplify_shared.Inlining_report.Inlining_tree.Key.scope ->
  Flambda2_simplify_shared.Inlining_report.Inlining_tree.Key.scope ->
  int

type element =

| Fundecl of string
| Scope of Flambda2_simplify_shared.Inlining_report.Inlining_tree.Key.scope * string
| Call of Flambda2_terms.Inlining_history.Absolute.t

val compare_element : 
  Flambda2_simplify_shared.Inlining_report.Inlining_tree.Key.element ->
  Flambda2_simplify_shared.Inlining_report.Inlining_tree.Key.element ->
  int

type t =
  Debuginfo.t
  * Flambda2_simplify_shared.Inlining_report.Inlining_tree.Key.element

val compare : 
  Flambda2_simplify_shared.Inlining_report.Inlining_tree.Key.t ->
  Flambda2_simplify_shared.Inlining_report.Inlining_tree.Key.t ->
  int

Module Inlining_tree.Key

Module `Inlining_tree.Key`