let
string_of_cap t =
BatString
.
Cap
.to_string (
BatString
.
Cap
.copy t)