module Cursor_context:sig
..end
type 'a
cursor_context
val build_cursor_context : 'a Cursor.cursor -> 'a cursor_context
val get_current_cursor : 'a cursor_context -> 'a Cursor.cursor
val push_node_to_cursor_context : 'a cursor_context -> 'a Cursor.cursor -> unit
val pop_node_from_cursor_context : 'a cursor_context -> unit option