Source position: sha1.inc line 22
procedure swiSHA1Final(
digest: pointer;
var ctx: TswiSHA1context_t
);