Disasm.Programtype t = private {instructions : Instr_cfg.t;callsites : Virtual_address.Set.t;entrypoints : Virtual_address.Set.t;unresolved_jumps : Virtual_address.Set.t;}val empty : tval create :
?callsites:Virtual_address.Set.t ->
?entrypoints:Virtual_address.Set.t ->
?unresolved_jumps:Virtual_address.Set.t ->
Instr_cfg.t ->
tDefault value for all sets is the empty set
val pp : Format.formatter -> t -> unit