val lident_of_path : Path.t -> Longident.t
type mapper = {
}
val default_mapper : mapper
val untype_structure : ?mapper:mapper -> Typedtree.structure -> Parsetree.structure
val untype_signature : ?mapper:mapper -> Typedtree.signature -> Parsetree.signature
val constant : Asttypes.constant -> Parsetree.constant