module type Quotation = sig
.. end
module Ast: Camlp4.Sig.Ast
module DynAst: Camlp4.Sig.DynAst
with module Ast = Ast
type 'a
expand_fun = Camlp4.Sig.Ast.loc -> string option -> string -> 'a
val add : string ->
'a DynAst.tag ->
'a expand_fun -> unit
val find : string ->
'a DynAst.tag -> 'a expand_fun
val default : string Pervasives.ref
val parse_quotation_result : (Camlp4.Sig.Ast.loc -> string -> 'a) ->
Camlp4.Sig.Ast.loc -> Camlp4.Sig.quotation -> string -> string -> 'a
val translate : (string -> string) Pervasives.ref
val expand : Camlp4.Sig.Ast.loc ->
Camlp4.Sig.quotation -> 'a DynAst.tag -> 'a
val dump_file : string option Pervasives.ref
module Error: Camlp4.Sig.Error