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