We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent e396a1a commit 1ddcf4cCopy full SHA for 1ddcf4c
src/baselib/ocsigen_stream.ml
@@ -189,7 +189,7 @@ let substream delim s =
189
then enlarge_stream stre >>= aux
190
else
191
try
192
- let p, (_ : Re.Group.t) =
+ let p, (_ : Re.substrings) =
193
Ocsigen_lib.Netstring_pcre.search_forward rdelim s 0
194
in
195
cont (String.sub s 0 p) (fun () ->
src/server/ocsigen_local_files.ml
@@ -102,7 +102,7 @@ let check_dotdot =
102
103
ignore
104
(Ocsigen_lib.Netstring_pcre.search_forward regexp filename 0
105
- : int * Re.Group.t);
+ : int * Re.substrings);
106
false
107
with Not_found -> true
108
0 commit comments