|
@@ -769,7 +769,7 @@ implementation
|
|
|
newlen:=length(s);
|
|
newlen:=length(s);
|
|
|
{ Replace with CRC if the parameter line is very long }
|
|
{ Replace with CRC if the parameter line is very long }
|
|
|
if (newlen-oldlen>12) and
|
|
if (newlen-oldlen>12) and
|
|
|
- ((newlen>128) or (newlen-oldlen>64)) then
|
|
|
|
|
|
|
+ ((newlen+length(prefix)>128) or (newlen-oldlen>32)) then
|
|
|
begin
|
|
begin
|
|
|
crc:=$ffffffff;
|
|
crc:=$ffffffff;
|
|
|
for i:=0 to tprocdef(st.defowner).paras.count-1 do
|
|
for i:=0 to tprocdef(st.defowner).paras.count-1 do
|
peter