File tree Expand file tree Collapse file tree 2 files changed +0
-20
lines changed Expand file tree Collapse file tree 2 files changed +0
-20
lines changed Original file line number Diff line number Diff line change @@ -119,11 +119,3 @@ let absolute_range t (range : Range.t) =
119
119
in
120
120
let stop = String_zipper. offset zipper in
121
121
(start, stop)
122
-
123
- module Expert = struct
124
- let goto t pos =
125
- let zipper = String_zipper. goto_position t.zipper pos `UTF8 in
126
- { t with zipper }
127
-
128
- let offset t = String_zipper. offset t.zipper
129
- end
Original file line number Diff line number Diff line change @@ -44,15 +44,3 @@ val absolute_position : t -> Position.t -> int
44
44
(* [absolute_range t range] same as [(absolute_position t range.start ,
45
45
absolute_position t range.end_)] but possibly faster *)
46
46
val absolute_range : t -> Range .t -> int * int
47
-
48
- module Expert : sig
49
- (* * These functions allow one to work with the underlying zipper. This gives
50
- the opportunity for better performance on chained edits. *)
51
-
52
- (* * [goto t pos] move the zipper of [t] to [pos]. [pos] must be in utf8 *)
53
- val goto : t -> Position .t -> t
54
-
55
- (* * [offset t] return the global offset in the string where the zipper is
56
- currently focused *)
57
- val offset : t -> int
58
- end
You can’t perform that action at this time.
0 commit comments