module Cursor:sig..end
type 'a t
exception Failure
val create : unit -> 'a tval before : 'a t -> unitval after : 'a t -> unitval insert : 'a t -> 'a -> unitval insert_last : 'a t -> 'a -> unitval peek : 'a t -> 'aval peek_last : 'a t -> 'aval goto_first : 'a t -> unitval goto_last : 'a t -> unitval get_all : 'a t -> 'a listval is_last_line : 'a t -> bool