(* CRC computation *)

val for_string: string -> int -> int -> int
val for_channel: in_channel -> int -> int = "crc_chan"