Module Ecaml_test_helpers.Buffer_helper

val with_buffer_and_point : (_, 'a) Ecaml.Sync_or_async.t -> string -> Ecaml.Line_and_column.t -> f:(unit -> 'a) -> 'a

with_buffer_and_point contents { col; row } ~f runs f in a temp buffer with contents and point at row and col.

val show_buffer : block_out:Ecaml.Position.t list -> unit
val show_point : unit -> unit

Print buffer contents with the point shown as a solid block.

module Region : sig ... end
val with_buffer_and_active_region : (_, 'a) Ecaml.Sync_or_async.t -> string -> Region.t -> f:(unit -> 'a) -> 'a

with_buffer_and_active_region contents region ~f runs f in a temp buffer with contents, mark at region.start, and point at region.end_.

val show_active_region : unit -> unit

Print buffer contents with the start and the end of the active region replaced by solid blocks.

module Sample_input : sig ... end