RollingHash[T] = object
  s: T
  hash_accum, base_pow, base_inv_pow: seq[uint]

CPLIB_STR_ROLLING_HASH = 1

proc build(rh: var RollingHash; maxa: uint = 1000000000; seed: int = -1)

proc initRollingHash(s: string): RollingHash[string] {....raises: [], tags: [].}

proc initRollingHash[T](s: openArray[T]): RollingHash[seq[T]]

proc query(rh: RollingHash; rng: HSlice[int, int]): uint