module String = Misc.Stdlib.String
val to_keep : String.Set.t Stdlib.ref
val keep : String.Set.elt -> bool
val expunge_map : Symtable.global_map -> Symtable.global_map
val expunge_crcs : (String.Set.elt * 'a) list -> (String.Set.elt * 'a) list
Expunge
module String = Misc.Stdlib.String
val to_keep : String.Set.t Stdlib.ref
val keep : String.Set.elt -> bool
val expunge_map : Symtable.global_map -> Symtable.global_map
val expunge_crcs : (String.Set.elt * 'a) list -> (String.Set.elt * 'a) list