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