mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-10 16:56:03 +02:00
parent
5c7defb63a
commit
9dd05b2dec
@ -5576,6 +5576,7 @@ begin
|
||||
if MergeRng.ContainsAddr(ARange.RangeStartAddr)
|
||||
then begin
|
||||
debugln(['ERROR: New Range is completely inside existing ', dbgs(MergeRng)]);
|
||||
ARange.Free;
|
||||
exit;
|
||||
end;
|
||||
// MergeRng changes ID
|
||||
|
Loading…
Reference in New Issue
Block a user