Module Ast_walker_annotate_context

module Ast_walker_annotate_context: sig .. end

type 'a 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