Module Compiler_data.QuotationHooks

type quotation = language:Scope.language -> State.t -> Elpi_parser.Ast.Loc.t -> string -> ScopedTerm.SimpleTerm.t
type descriptor = {
  1. named_quotations : quotation Elpi_util.Util.StrMap.t;
  2. default_quotation : quotation option;
  3. singlequote_compilation : (string * quotation) option;
  4. backtick_compilation : (string * quotation) option;
}
val new_descriptor : unit -> descriptor ref
val declare_singlequote_compilation : descriptor:descriptor ref -> string -> quotation -> string
val declare_backtick_compilation : descriptor:descriptor ref -> string -> quotation -> string
val set_default_quotation : descriptor:descriptor ref -> quotation -> unit
val register_named_quotation : descriptor:descriptor ref -> name:Elpi_util.Util.StrMap.key -> quotation -> Elpi_util.Util.StrMap.key