Module Baijiu_sha3.Unsafe
type ctx = {| q : int64 array; | 
| rsize : int; | 
| mdlen : int; | 
| mutable pt : int; | 
}val keccaft_rndc : int64 arrayval keccaft_rotc : int arrayval keccakf_piln : int arrayval swap64 : int64 -> int64val sha3_keccakf : int64 array -> unitval feed : a. get_uint8:('a -> int -> int) -> ctx -> 'a -> int -> int -> unitval unsafe_feed_bytes : ctx -> bytes -> int -> int -> unitval unsafe_feed_bigstring : ctx -> Bi.t -> int -> int -> unitval unsafe_get : ctx -> bytes