Source position: vd_compress.pas line 585
function adler32(
adler: uLong;
buf: pBytef;
len: uInt
):uLong;