class type digest = object .. end
object
end
method name : string
string
<uppercasestring>-<size>
method size : int
int
method block_length : int
method create : unit -> digest_ctx
unit -> digest_ctx