CPLIB_STR_RUN_LENGTH_ENCODE_UTILS = 1

proc run_length_encode(s: string): seq[(char, int)] {....raises: [], tags: [].}

proc run_length_encode[T](a: seq[T]): seq[(T, int)]