let s_len = String.length s in
let suffix_len = String.length suffix in
let suffix_sub = String.sub s (s_len - suffix_len) suffix_len in
- if suffix_sub <> suffix then raise (Invalid_argument "");
+ if suffix_sub <> suffix then raise (Invalid_argument "Http_getter_misc.strip_suffix");
String.sub s 0 (s_len - suffix_len)
with Invalid_argument _ ->
raise (Invalid_argument "Http_getter_misc.strip_suffix")