sig
  type 'a annotation_context
  type 'a annotation_update_fn = '-> Xquery_core_ast.acexpr -> unit
  val build_annotation_context :
    '->
    'Ast_walker_annotate_context.annotation_update_fn ->
    'Ast_walker_annotate_context.annotation_context
  val get_annotation_context :
    'Ast_walker_annotate_context.annotation_context -> 'a
  val get_annotation_update_fn :
    'Ast_walker_annotate_context.annotation_context ->
    'Ast_walker_annotate_context.annotation_update_fn
end