Expansion_context.Extension
val extension_point_loc : t -> Astlib.Location.t
val code_path : t -> Ppxlib__.Code_path.t
val input_name : t -> string
val tool_name : t -> string
val with_loc_and_path :
(loc:Astlib.Location.t -> path:string -> 'a) ->
ctxt:t ->
'a
val make : extension_point_loc:Astlib.Location.t -> base:Base.t -> unit -> t