2019-10-07 18:18:32 +04:00
|
|
|
(*
|
2019-05-13 00:56:22 +04:00
|
|
|
module RopeImplementation = Rope_implementation
|
|
|
|
type impl = RopeImplementation.t
|
|
|
|
type 'a t =
|
|
|
|
S : string -> (((impl -> 'a) -> 'b) -> (impl -> 'a) -> 'b) t
|
|
|
|
| Other : 'a -> 'a t
|
|
|
|
val _S : string -> ((impl -> 'a) -> 'b) -> (RopeImplementation.t -> 'a) -> 'b
|
|
|
|
val z :
|
|
|
|
(string -> ((impl -> 'a) -> 'b) -> (RopeImplementation.t -> 'a) -> 'b) t
|
|
|
|
val _d : ((impl -> int -> 'a) -> 'b) -> (RopeImplementation.t -> 'a) -> 'b
|
|
|
|
val d : (((impl -> int -> 'a) -> 'b) -> (RopeImplementation.t -> 'a) -> 'b) t
|
|
|
|
val _s : ((impl -> string -> 'a) -> 'b) -> (RopeImplementation.t -> 'a) -> 'b
|
|
|
|
val s :
|
|
|
|
(((impl -> string -> 'a) -> 'b) -> (RopeImplementation.t -> 'a) -> 'b) t
|
|
|
|
val start : (RopeImplementation.t -> 'a) -> 'a
|
|
|
|
val finish : impl -> impl
|
|
|
|
val ( ~% ) : (((impl -> 'a) -> 'a) -> 'b) t -> 'b
|
|
|
|
val ( % ) : 'a -> ('a -> 'b) t -> 'b
|
|
|
|
val ( #% ) : ((impl -> impl) -> 'a -> 'b) -> 'a -> 'b
|
2019-10-07 18:18:32 +04:00
|
|
|
*)
|