Hash.For_tests
val compare_state : Base.Hash.state -> Base.Hash.state -> int
val state_to_string : Base.Hash.state -> string