type vec = {off : int option; |
len : int option; |
}val blitter : ('a -> int) -> ('a -> int -> bigstring -> int -> int -> unit) -> 'a sval sub : 'a s -> (vec * 'a) tval list : ?sep:unit t -> 'a t -> 'a list tval option : 'a t -> 'a option tval pure : compare:('a -> 'a -> int) -> 'a -> 'a tval fail : string -> 'a tval const : string -> string tval (<|>) : 'a t -> 'a t -> 'a tval (<$>) : ('a -> 'b) -> 'b t -> 'a tval (<*>) : 'a t -> 'b t -> ('a * 'b) tval prefix : unit t -> 'a t -> 'a tval suffix : unit t -> 'a t -> 'a tval while0 : (char -> bool) -> string tval while1 : (char -> bool) -> string tval bigstring_while0 : (char -> bool) -> bigstring tval bigstring_while1 : (char -> bool) -> bigstring tval take : int -> string tval (*>) : unit t -> 'a t -> 'a tval (<*) : 'a t -> unit t -> 'a tval fix : ('a t -> 'a t) -> 'a tmodule Make : functor (S : sig ... end) -> sig ... endval to_string : 'v t -> 'v -> string