Source position: paszlib.pas line 74
function compress(
dest: Pchar;
var destLen: Cardinal;
source: Pchar;
sourceLen: Cardinal
):LongInt;