13 lines
192 B
OCaml
13 lines
192 B
OCaml
|
|
type t =
|
||
|
|
{ s : string
|
||
|
|
; pos : int
|
||
|
|
; len : int
|
||
|
|
}
|
||
|
|
|
||
|
|
module L : sig
|
||
|
|
type nonrec t = t list
|
||
|
|
|
||
|
|
val get_substring : t -> start:int -> stop:int -> string
|
||
|
|
val drop_rev : t -> int -> t
|
||
|
|
end
|